changeset 38911:99a7b10f0164

(mail-mode): Use adaptive-fill-regexp.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 22 Aug 2001 22:20:55 +0000
parents f56c0eb18cac
children 5dc3005827cd
files lisp/mail/sendmail.el
diffstat 1 files changed, 2 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- 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