(mime-display-text/richtext): Withdraw the last change.

(mime-display-text/enriched): Ditto.

diff --git a/ChangeLog b/ChangeLog
index 16f2e98..99d0ea5 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,6 +1,12 @@
+2005-06-14  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * mime-view.el (mime-display-text/richtext): Withdraw the last
+       change.
+       (mime-display-text/enriched): Ditto.
+
 2005-06-09  Katsumi Yamaoka  <yamaoka@jpl.org>
 
-       * mm-view.el (mime-display-text/richtext): Turn off
+       * mime-view.el (mime-display-text/richtext): Turn off
        adaptive-fill-mode while executing richtext-decode.
        (mime-display-text/enriched): Turn off adaptive-fill-mode while
        executing enriched-decode.

diff --git a/mime-view.el b/mime-view.el
index 31b8979..6155b60 100644 (file)
--- a/mime-view.el
+++ b/mime-view.el
@@ -805,8 +805,7 @@ Each elements are regexp of field-name.")
     (narrow-to-region (point-max)(point-max))
     (mime-insert-text-content entity)
     (run-hooks 'mime-text-decode-hook)
-    (let ((beg (point-min))
-         (adaptive-fill-mode nil))
+    (let ((beg (point-min)))
       (remove-text-properties beg (point-max) '(face nil))
       (richtext-decode beg (point-max))
       )))
@@ -816,8 +815,7 @@ Each elements are regexp of field-name.")
     (narrow-to-region (point-max)(point-max))
     (mime-insert-text-content entity)
     (run-hooks 'mime-text-decode-hook)
-    (let ((beg (point-min))
-         (adaptive-fill-mode nil))
+    (let ((beg (point-min)))
       (remove-text-properties beg (point-max) '(face nil))
       (enriched-decode beg (point-max))
       )))