X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=mel-u.el;h=c5f3fe179949d3cd582f4cf5aab701d5d1f13d02;hb=f4d49677a4011115067f8449c310948500ab9ed0;hp=9e37489dc9194e8c315ac1850d3ab659b8a57791;hpb=37072b50a75b6ba70085bf7b35d98457bd2361bc;p=elisp%2Fflim.git

diff --git a/mel-u.el b/mel-u.el
index 9e37489..c5f3fe1 100644
--- a/mel-u.el
+++ b/mel-u.el
@@ -20,8 +20,8 @@
 
 ;; You should have received a copy of the GNU General Public License
 ;; along with this program; see the file COPYING.  If not, write to the
-;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-;; Boston, MA 02111-1307, USA.
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
 
 ;;; Code:
 
@@ -69,8 +69,7 @@ This function uses external uuencode decoder which is specified by
 variable `uuencode-external-decoder'."
   (interactive "*r")
   (save-excursion
-    (let ((the-buf (current-buffer))
-	  (filename (make-temp-file "x-uue")))
+    (let ((filename (make-temp-file "x-uue")))
       (save-excursion
 	(save-restriction
 	  (set-mark end)
@@ -134,8 +133,7 @@ variable `uuencode-external-encoder'."
 START and END are buffer positions."
   (interactive "*r\nFWrite decoded region to file: ")
   (save-excursion
-    (let ((the-buf (current-buffer))
-	  (clone-buf (clone-buffer " *x-uue*"))
+    (let ((clone-buf (clone-buffer " *x-uue*"))
 	  (file (make-temp-file "x-uue")))
       (save-excursion
 	(save-restriction