(fill-flowed): Empty lines separate paragraphs

even if the preceding line ends with a soft break.  Tiny patch
from Mark Thomas <swoon@bellatlantic.net>.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f3b8d5c..8d61fb4 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2003-07-26  Kai Gro\e,A_\e(Bjohann  <kai.grossjohann@gmx.net>
+
+       * flow-fill.el (fill-flowed): Empty lines separate paragraphs
+       even if the preceding line ends with a soft break.  Tiny patch
+       from Mark Thomas <swoon@bellatlantic.net>.
+
 2003-07-25  Teodor Zlatanov  <tzz@lifelogs.com>
 
        * spam.el (spam-use-regex-body, spam-regex-body-spam) 

diff --git a/lisp/flow-fill.el b/lisp/flow-fill.el
index 15712a5..43f563e 100644 (file)
--- a/lisp/flow-fill.el
+++ b/lisp/flow-fill.el
@@ -127,7 +127,7 @@ RFC 2646 suggests 66 characters for readability."
                      (save-excursion
                        (unless (eobp)
                          (forward-char 1)
-                         (looking-at (format "^\\(%s\\)\\([^>]\\)"
+                         (looking-at (format "^\\(%s\\)\\([^>\n\r]\\)"
                                              (or quote " ?"))))))
            (save-excursion
              (replace-match (if (string= (match-string 2) " ")