From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Tue, 18 Aug 2020 09:56:39 +0000 (+0200)
Subject: Remove some compat code from uudecode.el
X-Git-Tag: emacs-28.0.90~6566
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c64fcb8ab52f6469760cc64063eb8010815e1ae5;p=emacs.git

Remove some compat code from uudecode.el

* lisp/mail/uudecode.el (uudecode-decode-region-external): Remove
check for make-temp-file, which is always defined.
---

diff --git a/lisp/mail/uudecode.el b/lisp/mail/uudecode.el
index 9423275b2e5..68e1227550d 100644
--- a/lisp/mail/uudecode.el
+++ b/lisp/mail/uudecode.el
@@ -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