summaryrefslogtreecommitdiff
path: root/lisp/gnus/flow-fill.el
diff options
context:
space:
mode:
authorMiles Bader <miles@gnu.org>2006-04-17 08:36:28 +0000
committerMiles Bader <miles@gnu.org>2006-04-17 08:36:28 +0000
commite4a89ccf738861d7b9c4f611185aa0f204c9c208 (patch)
treee9d64c9ce9ad1c7171cecbe1868cd75acf7e06c3 /lisp/gnus/flow-fill.el
parentb433a5608e182fb6bf4014a1219ba202fb1358a9 (diff)
downloademacs-e4a89ccf738861d7b9c4f611185aa0f204c9c208.tar.gz
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-225
Merge from gnus--rel--5.10 Patches applied: * gnus--rel--5.10 (patch 84-85) - Merge from emacs--devo--0 - Update from CVS
Diffstat (limited to 'lisp/gnus/flow-fill.el')
-rw-r--r--lisp/gnus/flow-fill.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/flow-fill.el b/lisp/gnus/flow-fill.el
index 98697439106..b47e9ba8365 100644
--- a/lisp/gnus/flow-fill.el
+++ b/lisp/gnus/flow-fill.el
@@ -114,7 +114,7 @@ RFC 2646 suggests 66 characters for readability."
(set-buffer (or (current-buffer) buffer))
(goto-char (point-min))
;; Remove space stuffing.
- (while (re-search-forward "^ " nil t)
+ (while (re-search-forward "^\\( \\|>+ $\\)" nil t)
(delete-char -1)
(forward-line 1))
(goto-char (point-min))