From: morioka <morioka>
Date: Tue, 18 Mar 1997 14:57:53 +0000 (+0000)
Subject: `mime::preview/article-buffer' -> `mime-raw-buffer'.
X-Git-Tag: emh-0_21~21
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=78a42570e016a4782c3ff3caec323d6037ecc6c7;p=elisp%2Femh.git

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

diff --git a/emh-comp.el b/emh-comp.el
index 547faed..8cb9498 100644
--- a/emh-comp.el
+++ b/emh-comp.el
@@ -7,7 +7,7 @@
 ;; Maintainer: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;; Created: 1996/2/29 (separated from tm-mh-e.el)
 ;;	Renamed: 1997/2/21 from tmh-comp.el
-;; Version: $Id: emh-comp.el,v 0.2 1997-03-07 14:25:21 morioka Exp $
+;; Version: $Id: emh-comp.el,v 0.3 1997-03-18 14:57:53 morioka Exp $
 ;; Keywords: mail composing, MH, MIME, mail
 
 ;; This file is part of emh.
@@ -150,7 +150,7 @@ system MH lib directory.")
 		    (save-excursion
 		      (set-buffer gnus-article-buffer)
 		      (if (eq major-mode 'mime-view-mode)
-			  mime::preview/article-buffer
+			  mime-raw-buffer
 			(current-buffer)
 			)))
 		   ))))
@@ -458,11 +458,11 @@ yanked message will be deleted."
 	    (delete-windows-on mh-show-buffer))
 	(set-buffer mh-show-buffer)	; Find displayed message
 	(let ((mh-ins-str
-	       (if mime::preview/article-buffer
+	       (if mime-raw-buffer
 		   (let (mime-view-plain-text-preview-hook buf)
 		     (prog1
 			 (save-window-excursion
-			   (set-buffer mime::preview/article-buffer)
+			   (set-buffer mime-raw-buffer)
 			   (setq buf (mime-view-mode))
 			   (buffer-string)
 			   )
diff --git a/emh.el b/emh.el
index c05ab29..9bd59c9 100644
--- a/emh.el
+++ b/emh.el
@@ -8,7 +8,7 @@
 ;; Created: 1993/11/21
 ;;	Renamed: 1993/11/27 from mh-e-mime.el
 ;;	Renamed: 1997/02/21 from tm-mh-e.el
-;; Version: $Revision: 0.16 $
+;; Version: $Revision: 0.17 $
 ;; Keywords: MH, MIME, multimedia, encoded-word, multilingual, mail
 
 ;; This file is part of emh.
@@ -38,7 +38,7 @@
 ;;;
 
 (defconst emh-RCS-ID
-  "$Id: emh.el,v 0.16 1997-03-18 14:41:56 morioka Exp $")
+  "$Id: emh.el,v 0.17 1997-03-18 14:57:06 morioka Exp $")
 
 (defconst emh-version (get-version-string emh-RCS-ID))
 
@@ -177,9 +177,9 @@ With arg, turn MIME processing on if arg is positive."
   (save-excursion
     (set-buffer mh-show-buffer)
     (if (null emh-automatic-mime-preview)
-	(if (and mime::preview/article-buffer
-		 (get-buffer mime::preview/article-buffer))
-	    (kill-buffer mime::preview/article-buffer)
+	(if (and mime-raw-buffer
+		 (get-buffer mime-raw-buffer))
+	    (kill-buffer mime-raw-buffer)
 	  )))
   (mh-invalidate-show-buffer)
   (mh-show (mh-get-msg-num t))