From: tomo <tomo>
Date: Mon, 10 Jan 2000 14:03:18 +0000 (+0000)
Subject: (emh-toggle-decoding-mode): Don't refer `mime-raw-buffer'.
X-Git-Tag: emacs-21_0_90-emh-1_13_0-0~8
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=509f90f15df2dd9d94ee2c7f35da8d9d5c9c391f;p=elisp%2Femh.git

(emh-toggle-decoding-mode): Don't refer `mime-raw-buffer'.
---

diff --git a/emh.el b/emh.el
index af0ad17..460d770 100644
--- a/emh.el
+++ b/emh.el
@@ -173,13 +173,11 @@ With arg, turn MIME processing on if arg is positive."
 	(if (null arg)
 	    (not emh-automatic-mime-preview)
 	  arg))
-  (save-excursion
-    (set-buffer mh-show-buffer)
-    (if (null emh-automatic-mime-preview)
-	(if (and mime-raw-buffer
-		 (get-buffer mime-raw-buffer))
-	    (kill-buffer mime-raw-buffer)
-	  )))
+  (let ((raw-buffer
+	 (concat "article-" (buffer-name (current-buffer)))))
+    (if (get-buffer raw-buffer)
+	(kill-buffer raw-buffer)
+      ))
   (mh-invalidate-show-buffer)
   (mh-show (mh-get-msg-num t))
   )