* flow-fill.el (fill-flowed): Flow-fill unquoted lines too, revert

part of 2004-07-25 change.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5b797b5..2152032 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-10-26  Simon Josefsson  <jas@extundo.com>
+
+       * flow-fill.el (fill-flowed): Flow-fill unquoted lines too, revert
+       part of 2004-07-25 change.
+
 2005-10-26  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * message.el (message-display-completion-list): New function.

diff --git a/lisp/flow-fill.el b/lisp/flow-fill.el
index 6cc6771..2e39fe5 100644 (file)
--- a/lisp/flow-fill.el
+++ b/lisp/flow-fill.el
@@ -110,7 +110,7 @@ RFC 2646 suggests 66 characters for readability."
     (while (re-search-forward " $" nil t)
       (when (save-excursion
              (beginning-of-line)
-             (looking-at "^\\(>+\\)\\( ?\\)"))
+             (looking-at "^\\(>*\\)\\( ?\\)"))
        (let ((quote (match-string 1))
              sig)
          (if (string= quote "")