diff options
Diffstat (limited to 'lisp/mail/uudecode.el')
| -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 |