From 5fae45c4063fa934c757aab7178e4a43908c514c Mon Sep 17 00:00:00 2001 From: yamaoka Date: Mon, 26 Oct 1998 02:08:29 +0000 Subject: [PATCH] Sync up with the latest semi-1_10. --- ChangeLog | 7 +++++++ VERSION | 4 ++-- mime-edit.el | 2 +- mime-image.el | 2 +- mime-partial.el | 3 ++- mime-pgp.el | 2 +- mime-play.el | 6 +++--- semi-def.el | 2 +- 8 files changed, 18 insertions(+), 10 deletions(-) diff --git a/ChangeLog b/ChangeLog index 468daa5..5d2c232 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,10 @@ +1998-10-24 MORIOKA Tomohiko + + * mime-play.el, mime-pgp.el, mime-partial.el, mime-image.el, + mime-edit.el: Use `temporary-file-directory' instead of + `mime-temp-directory'. + + 1998-10-23 Katsumi Yamaoka * WEMI: Version 1.10.0 (Shin-Kambara) released. diff --git a/VERSION b/VERSION index 09b16cd..781313f 100644 --- a/VERSION +++ b/VERSION @@ -68,7 +68,7 @@ 1.9.0 Isurugi $(B@PF0(B 1.9.1 Kurikara $(B6fMx2@Me(B 1.10.0 Tsubata $(BDEH((B ------ Morimoto $(B?9K\(B +1.10.1 Morimoto $(B?9K\(B ------- Higashi-Kanazawa $(BEl6bBt(B ------- Kanazawa $(B6bBt(B ; <=> $(BKLN&E4F;(B $(BKLE46bBt(B ------- Nishi-Kanazawa $(B@>6bBt(B ; <=> $(BKLN&E4F;(B $(B?7@>6bBt(B @@ -129,7 +129,7 @@ 1.9.0 Fuji $(BIY;N(B ; = JR $(B?H1d@~(B 1.9.1 Fujikawa $(BIY;N@n(B 1.10.0 Shin-Kambara $(B?73w86(B ------- Kambara $(B3w86(B +1.10.1 Kambara $(B3w86(B ------ Yui $(BM3Hf(B ------ Okitsu $(B6=DE(B ------ Shimizu $(B@6?e(B diff --git a/mime-edit.el b/mime-edit.el index 2187b32..709c093 100644 --- a/mime-edit.el +++ b/mime-edit.el @@ -2413,7 +2413,7 @@ Content-Type: message/partial; id=%s; number=%d; total=%d\n%s\n" (let* ((mime-edit-draft-file-name (or (buffer-file-name) (make-temp-name - (expand-file-name "mime-draft" mime-temp-directory)))) + (expand-file-name "mime-draft" temporary-file-directory)))) (separator mail-header-separator) (id (concat "\"" (replace-space-with-underline (current-time-string)) diff --git a/mime-image.el b/mime-image.el index 1e20ac0..d5e4aa0 100644 --- a/mime-image.el +++ b/mime-image.el @@ -146,7 +146,7 @@ ((eq (aref gl 0) 'xbm) (let ((xbm-file (make-temp-name - (expand-file-name "tm" mime-temp-directory)))) + (expand-file-name "tm" temporary-file-directory)))) (with-temp-buffer (insert (aref gl 2)) (write-region (point-min)(point-max) xbm-file) diff --git a/mime-partial.el b/mime-partial.el index f5378eb..e085eab 100644 --- a/mime-partial.el +++ b/mime-partial.el @@ -39,7 +39,8 @@ partial messages using mime-view." (subject-buf (eval (cdr (assq 'summary-buffer-exp situation)))) subject-id (root-dir (expand-file-name - (concat "m-prts-" (user-login-name)) mime-temp-directory)) + (concat "m-prts-" (user-login-name)) + temporary-file-directory)) (request-partial-message-method (cdr (assq 'request-partial-message-method situation))) full-file) diff --git a/mime-pgp.el b/mime-pgp.el index 67fbb6e..0facca0 100644 --- a/mime-pgp.el +++ b/mime-pgp.el @@ -166,7 +166,7 @@ It should be ISO 639 2 letter language code such as en, ja, ...") (1- knum) (1+ knum))) (orig-entity (nth onum (mime-entity-children mother))) - (basename (expand-file-name "tm" mime-temp-directory)) + (basename (expand-file-name "tm" temporary-file-directory)) (orig-file (make-temp-name basename)) (sig-file (concat orig-file ".sig")) ) diff --git a/mime-play.el b/mime-play.el index 4772f9a..11f904b 100644 --- a/mime-play.el +++ b/mime-play.el @@ -324,9 +324,9 @@ specified, play as it. Default MODE is \"play\"." (name (mime-entity-safe-filename entity))) (setq name (if (and name (not (string= name ""))) - (expand-file-name name mime-temp-directory) + (expand-file-name name temporary-file-directory) (make-temp-name - (expand-file-name "EMI" mime-temp-directory)) + (expand-file-name "EMI" temporary-file-directory)) )) (mime-write-entity-content entity name) (message "External method is starting...") @@ -543,7 +543,7 @@ It is registered to variable `mime-preview-quitting-method-alist'." (goto-char (mime-entity-point-min entity)) (let* ((root-dir (expand-file-name - (concat "m-prts-" (user-login-name)) mime-temp-directory)) + (concat "m-prts-" (user-login-name)) temporary-file-directory)) (id (cdr (assoc "id" cal))) (number (cdr (assoc "number" cal))) (total (cdr (assoc "total" cal))) diff --git a/semi-def.el b/semi-def.el index 3376372..8307320 100644 --- a/semi-def.el +++ b/semi-def.el @@ -30,7 +30,7 @@ (require 'custom) -(defconst mime-user-interface-product '["WEMI" (1 10 0) "Shin-Kambara"] +(defconst mime-user-interface-product '["WEMI" (1 10 1) "Kambara"] "Implementation name, version name and numbers of MIME-kernel package.") (autoload 'mule-caesar-region "mule-caesar" -- 1.7.10.4