From: yamaoka <yamaoka>
Date: Tue, 14 Jun 2005 01:38:13 +0000 (+0000)
Subject: (mime-display-text/richtext): Withdraw the last change.
X-Git-Tag: emiko-1_14-epg-branchpoint~12
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=d2c89850b5b527cf5ccef382fab8df855f0f6fdb;p=elisp%2Fsemi.git

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

diff --git a/ChangeLog b/ChangeLog
index df4a2c7..ab57c6a 100644
--- 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 890cbaf..8c5d0eb 100644
--- a/mime-view.el
+++ b/mime-view.el
@@ -790,8 +790,7 @@ Each elements are regexp of field-name.")
     (narrow-to-region (point-max)(point-max))
     (mime-view-insert-text-content entity situation)
     (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)))))
 
@@ -800,8 +799,7 @@ Each elements are regexp of field-name.")
     (narrow-to-region (point-max)(point-max))
     (mime-view-insert-text-content entity situation)
     (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)))))