(mail-mode): Use adaptive-fill-regexp.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b3ed84f1c9ec6793a01cfef1710c8cc48fdc5ec1..30d58ad4da62443530845edf1a27f36f99be56fe 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2001-08-22  Stefan Monnier  <monnier@cs.yale.edu>
+
+       * mail/sendmail.el (mail-mode): Use adaptive-fill-regexp.
+
+       * textmodes/fill.el (adaptive-fill-regexp): Admit tabs as well.
+
 2001-08-22  Eli Zaretskii  <eliz@is.elta.co.il>
 
        * simple.el (line-number-mode): Mention the variable

diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index 1ff0453e62ec3ec033380c0c07d229704c409edf..5c572587dcf0ff6ae5b3cf10d24f246c25e48ffc 100644 (file)
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -497,9 +497,8 @@ Turning on Mail mode runs the normal hooks `text-mode-hook' and
   (set (make-local-variable 'comment-start) mail-yank-prefix)
   (make-local-variable 'adaptive-fill-regexp)
   (setq adaptive-fill-regexp
-       (concat "[ \t]*\\([-|#;>*]+ *\\|(?[0-9]+[.)] *\\)+"
-               "\\|[ \t]*[-[:alnum:]]*>+[ \t]*"
-               "\\|[ \t]*"))
+       (concat adaptive-fill-regexp
+               "\\|[ \t]*[-[:alnum:]]*>+[ \t]*"))
   (make-local-variable 'adaptive-fill-first-line-regexp)
   (setq adaptive-fill-first-line-regexp
        (concat adaptive-fill-first-line-regexp