mel-u.el Fix.
[elisp/flim.git] / mel-u.el
index 9e37489..abd6f17 100644 (file)
--- a/mel-u.el
+++ b/mel-u.el
@@ -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