From 8f3f83b0416d2be41c70e9c593888fb71be99768 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Tue, 14 Jun 2005 01:38:03 +0000 Subject: [PATCH] (mime-display-text/richtext): Withdraw the last change. (mime-display-text/enriched): Ditto. --- ChangeLog | 8 +++++++- mime-view.el | 6 ++---- 2 files changed, 9 insertions(+), 5 deletions(-) diff --git a/ChangeLog b/ChangeLog index 16f2e98..99d0ea5 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,6 +1,12 @@ +2005-06-14 Katsumi Yamaoka + + * mime-view.el (mime-display-text/richtext): Withdraw the last + change. + (mime-display-text/enriched): Ditto. + 2005-06-09 Katsumi Yamaoka - * 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 --- 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)) ))) -- 1.7.10.4