[patch] RFC2646, MIME format=flowed support

[Simon Josefsson <jas@pdc.kth.se>]

I've been sitting on this for a while, 
somewhat hesitant about simply committing 
it in case that it explodes. Please try 
it out to see if it works (or not).

Anyway, put

http://www.pdc.kth.se/~jas/fill-flowed.el

in your load-path and apply the patch 
below and your Gnus should recognize 
the wonders of RFC2646.

For entertainment, I manually 
encoded this article 
according to RFC2646.

Suggestions welcome, if someone want to 
rewrite the whole function into readable 
elisp I'd be very happy. :-)

Index: lisp/mm-view.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/mm-view.el,v
retrieving revision 5.40
diff -w -u -r5.40 mm-view.el
--- lisp/mm-view.el     1999/12/12 17:33:18     5.40
+++ lisp/mm-view.el     2000/02/17 16:37:24
@@ -136,6 +136,14 @@
            (charset (mail-content-type-get
                      (mm-handle-type handle) 'charset)))
        (insert (mm-decode-string text charset))
+       (when (and (equal type "plain")
+                  (equal (cdr (assoc 'format (mm-handle-type handle)))
+                         "flowed"))
+         (save-restriction
+           (narrow-to-region b (point))
+           (goto-char b)
+           (fill-flowed)
+           (goto-char (point-max))))
        (save-restriction
          (narrow-to-region b (point))
          (set-text-properties (point-min) (point-max) nil)