From: morioka <morioka>
Date: Thu, 21 Jan 1999 19:52:09 +0000 (+0000)
Subject: (mime-view-message/rfc822): Don't expect called in raw-buffer.
X-Git-Tag: semi-1_13_0~2
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=4a8deb2bb8e123366aa177cd46c0170a058f03f0;p=elisp%2Fsemi.git

(mime-view-message/rfc822): Don't expect called in raw-buffer.
---

diff --git a/mime-play.el b/mime-play.el
index f412dd9..6a2fc1a 100644
--- a/mime-play.el
+++ b/mime-play.el
@@ -500,7 +500,7 @@ It is registered to variable `mime-preview-quitting-method-alist'."
 (defun mime-view-message/rfc822 (entity situation)
   (let* ((new-name
 	  (format "%s-%s" (buffer-name) (mime-entity-number entity)))
-	 (mother mime-preview-buffer)
+	 (mother (current-buffer))
 	 (children (car (mime-entity-children entity))))
     (set-buffer (get-buffer-create new-name))
     (erase-buffer)