(mail-mode) <adaptive-fill-first-line-regexp>: Undo half of last change.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e318a0e5394318b0d712f5e911354b92e88c765a..bbe5d92be6df73c41436baf4b6a1f3ac25851226 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2002-02-01  Stefan Monnier  <monnier@cs.yale.edu>
 
+       * mail/sendmail.el (mail-mode) <adaptive-fill-first-line-regexp>:
+       Undo half of last change.
+
        * hi-lock.el (hi-lock-find-patterns): Save restriction.
 
 2002-01-29  Pavel Jan\e,Bm\e(Bk  <Pavel@Janik.cz>
@@ -22,8 +25,8 @@
 
 2002-01-25  Jason Rumney  <jasonr@gnu.org>
 
-       * faces.el (face-font-registry-alternatives) [windows-nt]: Add
-       ms-oemlatin as an alternative for iso8859-1.
+       * faces.el (face-font-registry-alternatives) [windows-nt]:
+       Add ms-oemlatin as an alternative for iso8859-1.
 
 2002-01-25  Eli Zaretskii  <eliz@is.elta.co.il>
 

diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index 3c56c00d7b6824e83c88dcec0ab43036460d7fa9..82ecbdf7a024f2a05d1a22fab4b7bfb725a50ed2 100644 (file)
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -500,7 +500,7 @@ Turning on Mail mode runs the normal hooks `text-mode-hook' and
   (make-local-variable 'adaptive-fill-first-line-regexp)
   (setq adaptive-fill-first-line-regexp
        (concat adaptive-fill-first-line-regexp
-               "\\|[ \t]*[-[:alnum:]]+>+[ \t]*"))
+               "\\|[ \t]*[-[:alnum:]]*>+[ \t]*"))
   ;; `-- ' precedes the signature.  `-----' appears at the start of the
   ;; lines that delimit forwarded messages.
   ;; Lines containing just >= 3 dashes, perhaps after whitespace,