diff options
| author | Miles Bader <miles@gnu.org> | 2006-02-24 05:02:12 +0000 |
|---|---|---|
| committer | Miles Bader <miles@gnu.org> | 2006-02-24 05:02:12 +0000 |
| commit | 5f4264e54bb59b9b0590a113fbd015c3c0920f7a (patch) | |
| tree | c837d5156b4a275296c31cdeb3ad9de46ef17a4d /lisp/gnus/mm-view.el | |
| parent | 9f261d3c1d29f48ca2f8f96e4809bccbe3c81e89 (diff) | |
| download | emacs-5f4264e54bb59b9b0590a113fbd015c3c0920f7a.tar.gz | |
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-118
Merge from gnus--rel--5.10
Patches applied:
* gnus--rel--5.10 (patch 38-39)
- Update from CVS
Diffstat (limited to 'lisp/gnus/mm-view.el')
| -rw-r--r-- | lisp/gnus/mm-view.el | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/lisp/gnus/mm-view.el b/lisp/gnus/mm-view.el index 43d6bddf194..c2b4e19f806 100644 --- a/lisp/gnus/mm-view.el +++ b/lisp/gnus/mm-view.el @@ -72,6 +72,12 @@ (html2text html2text)) "The attributes of washer types for text/html.") +(defcustom mm-fill-flowed t + "If non-nil an format=flowed article will be displayed flowed." + :type 'boolean + :version "22.1" + :group 'mime-display) + ;;; Internal variables. ;;; @@ -407,7 +413,8 @@ (mm-insert-part handle) (goto-char (point-max))) (insert (mm-decode-string (mm-get-part handle) charset))) - (when (and (equal type "plain") + (when (and mm-fill-flowed + (equal type "plain") (equal (cdr (assoc 'format (mm-handle-type handle))) "flowed")) (save-restriction |