(mm-tmp-directory): Re-write to help avoid warnings.
authorDave Love <fx@gnu.org>
Thu, 24 Apr 2003 18:46:56 +0000 (18:46 +0000)
committerDave Love <fx@gnu.org>
Thu, 24 Apr 2003 18:46:56 +0000 (18:46 +0000)
lisp/mm-decode.el

index 249f3e9..3cf9a0b 100644 (file)
@@ -308,9 +308,11 @@ to:
   :group 'mime-display)
 
 (defcustom mm-tmp-directory
-  (cond ((fboundp 'temp-directory) (temp-directory))
-       ((boundp 'temporary-file-directory) temporary-file-directory)
-       ("/tmp/"))
+  (if (fboundp 'temp-directory)
+      (temp-directory)
+    (if (boundp 'temporary-file-directory)
+       temporary-file-directory
+      "/tmp/"))
   "Where mm will store its temporary files."
   :type 'directory
   :group 'mime-display)