# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 870801906 0
# Node ID 2746f25df3337af735f4689ef613ec718cf5236c
# Parent  ecc4375537e3fd734e679b37ca1b12d5a98ee102
(mail-mode): Allow TAB after prefix in previous change.

diff -r ecc4375537e3 -r 2746f25df333 lisp/mail/sendmail.el
--- a/lisp/mail/sendmail.el	Tue Aug 05 17:16:00 1997 +0000
+++ b/lisp/mail/sendmail.el	Tue Aug 05 17:25:06 1997 +0000
@@ -348,7 +348,7 @@
   (setq fill-paragraph-function 'mail-mode-fill-paragraph)
   (make-local-variable 'adaptive-fill-regexp)
   (setq adaptive-fill-regexp
-	(concat "[ \t]*[a-z0-9A-Z]*>+ *\\|" adaptive-fill-regexp))
+	(concat "[ \t]*[a-z0-9A-Z]*>+[ \t]*\\|" adaptive-fill-regexp))
   (make-local-variable 'adaptive-fill-first-line-regexp)
   (setq adaptive-fill-first-line-regexp adaptive-fill-regexp)
   ;; `-- ' precedes the signature.  `-----' appears at the start of the
@@ -356,7 +356,7 @@
   ;; Lines containing just >= 3 dashes, perhaps after whitespace,
   ;; are also sometimes used and should be separators.
   (setq paragraph-start (concat (regexp-quote mail-header-separator)
-				"$\\|[ \t]*[a-z0-9A-Z]*>+ *$\\|[ \t]*$\\|"
+				"$\\|[ \t]*[a-z0-9A-Z]*>+[ \t]*$\\|[ \t]*$\\|"
 				page-delimiter))
   (setq paragraph-separate paragraph-start)
   (run-hooks 'text-mode-hook 'mail-mode-hook))