Remove some compat code from uudecode.el
authorLars Ingebrigtsen <larsi@gnus.org>
Tue, 18 Aug 2020 09:56:39 +0000 (11:56 +0200)
committerLars Ingebrigtsen <larsi@gnus.org>
Tue, 18 Aug 2020 09:56:39 +0000 (11:56 +0200)
* lisp/mail/uudecode.el (uudecode-decode-region-external): Remove
check for make-temp-file, which is always defined.

lisp/mail/uudecode.el

index 9423275b2e567cb9e2b7d2932c370695c1599d30..68e1227550d2f563fed154591ed91d4ecf33cc26 100644 (file)
@@ -86,13 +86,9 @@ used is specified by `uudecode-decoder-program'."
                                               (match-string 1)))))
        (setq tempfile (if file-name
                           (expand-file-name file-name)
-                          (if (fboundp 'make-temp-file)
-                              (let ((temporary-file-directory
-                                     uudecode-temporary-file-directory))
-                                (make-temp-file "uu"))
-                            (expand-file-name
-                             (make-temp-name "uu")
-                             uudecode-temporary-file-directory))))
+                        (let ((temporary-file-directory
+                               uudecode-temporary-file-directory))
+                          (make-temp-file "uu"))))
        (let ((cdir default-directory)
              (default-process-coding-system nil))
          (unwind-protect