From: morioka Date: Wed, 6 May 1998 06:25:38 +0000 (+0000) Subject: (mime-temp-directory): New variable (moved from mel.el). X-Git-Tag: flim-1_2_0~19 X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Fflim.git;a=commitdiff_plain;h=0b3d4d517cb3b15d5d9f196ae8f0362c4b693155 (mime-temp-directory): New variable (moved from mel.el). --- diff --git a/mime-def.el b/mime-def.el index c663649..1812efc 100644 --- a/mime-def.el +++ b/mime-def.el @@ -25,7 +25,7 @@ ;;; Code: (defconst mime-spadework-module-version-string - "FLIM 1.1.1 - \"J-Dþjò\"")-A + "FLIM 1.1.1 - \"J-Dþjò\" ")-A (require 'custom) @@ -37,6 +37,15 @@ (custom-handle-keyword 'default-mime-charset :group 'mime 'custom-variable) +(defvar mime-temp-directory (or (getenv "MIME_TMP_DIR") + (getenv "TM_TMP_DIR") + (getenv "TMPDIR") + (getenv "TMP") + (getenv "TEMP") + "/tmp/") + "*Directory for temporary files.") + + (unless (fboundp 'butlast) (defun butlast (x &optional n) "Returns a copy of LIST with the last N elements removed."