* mime-view.el (mime-preview-toggle-display): Use boundary with

children.

diff --git a/ChangeLog b/ChangeLog
index aef0adf..340a561 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2003-04-05  Yoichi NAKAYAMA  <yoichi@geiin.org>
+
+       * mime-view.el (mime-preview-toggle-display): Use boundary with
+       children.
+
 2003-02-08  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
 
        * semi-def.el (mime-should-use-popup-menu): New function.

diff --git a/mime-view.el b/mime-view.el
index add702e..b5164d4 100644 (file)
--- a/mime-view.el
+++ b/mime-view.el
@@ -1806,7 +1806,7 @@ If LINES is negative, scroll up LINES lines."
 ;;;
 
 (defun mime-preview-toggle-display (type &optional display)
-  (let ((situation (mime-preview-find-boundary-info))
+  (let ((situation (mime-preview-find-boundary-info t))
        (sym (intern (concat "*" (symbol-name type))))
        entity p-beg p-end)
     (setq p-beg (aref situation 0)