From: yamaoka <yamaoka>
Date: Sun, 16 Jan 2000 22:20:34 +0000 (+0000)
Subject: Sync with semi-1_13.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=be6d8c3cd630bb99c8b8e92a27c5476cbaf78773;p=elisp%2Fsemi.git

Sync with semi-1_13.
---

diff --git a/ChangeLog b/ChangeLog
index f5184b0..f767e0d 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2000-01-16  Keiichi Suzuki  <keiichi@nanap.org>
+
+	* mime-w3.el (mime-preview-text/html): Don't get root entity from
+	`mime-entity-buffer'.
+
 2000-01-05  Katsumi Yamaoka   <yamaoka@jpl.org>
 
 	* Makefile, README.en: Update for the new CVS server.
diff --git a/mime-w3.el b/mime-w3.el
index 6ce9927..80d67ce 100644
--- a/mime-w3.el
+++ b/mime-w3.el
@@ -47,8 +47,10 @@
 
 (defun mime-preview-text/html (entity situation)
   (setq mime-w3-message-structure
-	(with-current-buffer (mime-entity-buffer entity)
-	  mime-message-structure))
+	(let ((ent entity))
+	  (while (not (mime-root-entity-p ent))
+	    (setq ent (mime-entity-parent ent)))
+	  ent))
   (goto-char (point-max))
   (let ((p (point)))
     (insert "\n")