diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 18d3db9cc90..42562bb143d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2002-02-01  Stefan Monnier  <monnier@cs.yale.edu>
 
+	* mail/sendmail.el (mail-mode): Undo half of last change.
+
 	* indent.el (indent-for-tab-command): Remove spurious code.
 
 	* hi-lock.el (hi-lock-find-patterns): Save restriction.
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index 8497af5f7ef..4986b75c983 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -491,7 +491,7 @@ Turning on Mail mode runs the normal hooks `text-mode-hook' and
 		adaptive-fill-regexp))
   (make-local-variable 'adaptive-fill-first-line-regexp)
   (setq adaptive-fill-first-line-regexp
-	(concat "[ \t]*[-[:alnum:]]+>+[ \t]*\\|"
+	(concat "[ \t]*[-[:alnum:]]*>+[ \t]*\\|"
 		adaptive-fill-first-line-regexp))
   ;; `-- ' precedes the signature.  `-----' appears at the start of the
   ;; lines that delimit forwarded messages.