Variable `mime/tmp-dir' was renamed to `mime-temp-directory'.

diff --git a/mime-image.el b/mime-image.el
index 8b7e863..012476d 100644 (file)
--- a/mime-image.el
+++ b/mime-image.el
@@ -9,7 +9,7 @@
 ;; Created: 1995/12/15
 ;;     Renamed: 1997/2/21 from tm-image.el
 ;; Version:
-;;     $Id: mime-image.el,v 0.2 1997-02-28 02:22:03 tmorioka Exp $
+;;     $Id: mime-image.el,v 0.3 1997-03-04 13:05:34 morioka Exp $
 
 ;; Keywords: image, picture, X-Face, MIME, multimedia, mail, news
 
@@ -163,7 +163,8 @@
             )
            ((eq (aref gl 0) 'xbm)
             (let ((xbm-file
-                   (make-temp-name (expand-file-name "tm" mime/tmp-dir))))
+                   (make-temp-name
+                    (expand-file-name "tm" mime-temp-directory))))
               (insert (aref gl 2))
               (write-region (point-min)(point-max) xbm-file)
               (message "Decoding image...")
@@ -192,7 +193,8 @@
   (let* ((mode mime::preview/original-major-mode)
         (m (assq mode mime-view-code-converter-alist))
         (beg (point-min)) (end (point-max))
-        (file-base (make-temp-name (expand-file-name "tm" mime/tmp-dir)))
+        (file-base
+         (make-temp-name (expand-file-name "tm" mime-temp-directory)))
         (ps-file (concat file-base ".ps"))
         (gif-file (concat file-base ".gif"))
         )

diff --git a/mime-play.el b/mime-play.el
index 698b2bb..f82fbe1 100644 (file)
--- a/mime-play.el
+++ b/mime-play.el
@@ -5,7 +5,7 @@
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Created: 1995/9/26 (separated from tm-view.el)
 ;;     Renamed: 1997/2/21 from tm-play.el
-;; Version: $Id: mime-play.el,v 0.10 1997-02-28 05:14:54 tmorioka Exp $
+;; Version: $Id: mime-play.el,v 0.11 1997-03-04 13:09:40 morioka Exp $
 ;; Keywords: MIME, multimedia, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -115,7 +115,7 @@
            )
        (if method
            (let ((file (make-temp-name
-                        (expand-file-name "TM" mime/tmp-dir)))
+                        (expand-file-name "TM" mime-temp-directory)))
                  b args)
              (if (nth 1 method)
                  (setq b beg)
@@ -281,8 +281,9 @@
 
 (defun mime-article/decode-message/partial (beg end cal)
   (goto-char beg)
-  (let* ((root-dir (expand-file-name
-                   (concat "m-prts-" (user-login-name)) mime/tmp-dir))
+  (let* ((root-dir
+         (expand-file-name
+          (concat "m-prts-" (user-login-name)) mime-temp-directory))
         (id (cdr (assoc "id" cal)))
         (number (cdr (assoc "number" cal)))
         (total (cdr (assoc "total" cal)))