From: morioka <morioka>
Date: Tue, 18 Mar 1997 15:12:10 +0000 (+0000)
Subject: `mime::preview/article-buffer' -> `mime-raw-buffer'.
X-Git-Tag: Hokutetsu-Ishikawa-new~47
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=275b554762c59ea783db7347c89faee0c5a2fe71;p=elisp%2Fsemi.git

`mime::preview/article-buffer' -> `mime-raw-buffer'.
---

diff --git a/mime-edit.el b/mime-edit.el
index 024b5a3..3e2a78c 100644
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -7,7 +7,7 @@
 ;; Maintainer: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Created: 1994/08/21 renamed from mime.el
 ;;	Renamed: 1997/2/21 from tm-edit.el
-;; Version: $Revision: 0.73 $
+;; Version: $Revision: 0.74 $
 ;; Keywords: MIME, multimedia, multilingual, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -122,7 +122,7 @@
 ;;;
 
 (defconst mime-edit-RCS-ID
-  "$Id: mime-edit.el,v 0.73 1997-03-15 20:36:32 morioka Exp $")
+  "$Id: mime-edit.el,v 0.74 1997-03-18 15:10:39 morioka Exp $")
 
 (defconst mime-edit-version (get-version-string mime-edit-RCS-ID))
 
@@ -2410,7 +2410,8 @@ Content-Type: message/partial; id=%s; number=%d; total=%d\n%s\n"
     ))
 
 (defun mime-edit-quitting-method ()
-  (let ((temp mime::preview/article-buffer)
+  "Quitting method for mime-view."
+  (let ((temp mime-raw-buffer)
 	buf)
     (mime-view-kill-buffer)
     (set-buffer temp)
diff --git a/mime-play.el b/mime-play.el
index 7c4042b..fd52cf0 100644
--- 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.27 1997-03-18 14:46:40 morioka Exp $
+;; Version: $Id: mime-play.el,v 0.28 1997-03-18 15:11:32 morioka Exp $
 ;; Keywords: MIME, multimedia, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -238,7 +238,7 @@ It is registered to variable `mime-view-quitting-method-alist'."
   (let ((mother mime::preview/mother-buffer)
 	(win-conf mime::preview/original-window-configuration)
 	)
-    (kill-buffer mime::preview/article-buffer)
+    (kill-buffer mime-raw-buffer)
     (mime-view-kill-buffer)
     (set-window-configuration win-conf)
     (pop-to-buffer mother)
diff --git a/mime-text.el b/mime-text.el
index 972fcaa..ce93088 100644
--- a/mime-text.el
+++ b/mime-text.el
@@ -4,7 +4,7 @@
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Version:
-;;	$Id: mime-text.el,v 0.21 1997-03-18 09:48:25 morioka Exp $
+;;	$Id: mime-text.el,v 0.22 1997-03-18 15:12:10 morioka Exp $
 ;; Keywords: text, MIME, multimedia, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -88,7 +88,7 @@ variable `mime-text-decoder' and variable `mime-text-decoder-alist'."
   (mime-decode-region (point-min) (point-max) encoding)
   (let ((text-decoder
 	 (save-excursion
-	   (set-buffer mime::preview/article-buffer)
+	   (set-buffer mime-raw-buffer)
 	   (or mime-text-decoder
 	       (cdr (or (assq major-mode mime-text-decoder-alist)
 			(assq t mime-text-decoder-alist)))