# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 998518855 0
# Node ID 99a7b10f0164a1cd5f7091c9cbdf5d010e1d55b9
# Parent  f56c0eb18cacfc2215aad72afd57914d4c176bd2
(mail-mode): Use adaptive-fill-regexp.

diff -r f56c0eb18cac -r 99a7b10f0164 lisp/mail/sendmail.el
--- a/lisp/mail/sendmail.el	Wed Aug 22 22:20:06 2001 +0000
+++ b/lisp/mail/sendmail.el	Wed Aug 22 22:20:55 2001 +0000
@@ -497,9 +497,8 @@
   (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