(mime-preview-text/html): Don't get root entity from `mime-entity-buffer'.

diff --git a/mime-w3.el b/mime-w3.el
index 6ce9927..80d67ce 100644 (file)
--- 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")