diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2020-08-18 11:56:39 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2020-08-18 11:56:39 +0200 |
| commit | c64fcb8ab52f6469760cc64063eb8010815e1ae5 (patch) | |
| tree | d3512c32d3af8f93c234979fadfa554d1ee7d155 | |
| parent | 85f0e3df73e1a2c0a355e224b97db017a1fb4adf (diff) | |
| download | emacs-c64fcb8ab52f6469760cc64063eb8010815e1ae5.tar.gz | |
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.
| -rw-r--r-- | lisp/mail/uudecode.el | 10 |
1 files changed, 3 insertions, 7 deletions
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 |