From: tomo <tomo>
Date: Thu, 10 Feb 2000 10:50:26 +0000 (+0000)
Subject: (mime-display-message): Use `major-mode' of current-buffer as default
X-Git-Tag: remi-1_14_0~12
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=6998c3739fdc7f4d27fcdccfdd913467a6da4dc1;p=elisp%2Fsemi.git

(mime-display-message): Use `major-mode' of current-buffer as default
value of `original-major-mode'; don't use `mime-entity-header-buffer'.
---

diff --git a/mime-view.el b/mime-view.el
index 83afc8c..005dfde 100644
--- a/mime-view.el
+++ b/mime-view.el
@@ -1241,9 +1241,7 @@ keymap of MIME-View mode."
 	(setq preview-buffer
 	      (concat "*Preview-" (mime-entity-name message) "*")))
     (or original-major-mode
-	(setq original-major-mode
-	      (with-current-buffer (mime-entity-header-buffer message)
-		major-mode)))
+	(setq original-major-mode major-mode))
     (let ((inhibit-read-only t))
       (set-buffer (get-buffer-create preview-buffer))
       (widen)