# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 873714525 0
# Node ID 0db6ba06cd1cd61736154ee6b99543a1451a4b90
# Parent  2b1a8f775e0928ab42ed2c5339ff87e138aef706
(mail-mode): Allow dash in citation prefixes
in adaptive-fill-regexp and adaptive-fill-first-line-regexp.

diff -r 2b1a8f775e09 -r 0db6ba06cd1c lisp/mail/sendmail.el
--- a/lisp/mail/sendmail.el	Mon Sep 08 10:27:58 1997 +0000
+++ b/lisp/mail/sendmail.el	Mon Sep 08 10:28:45 1997 +0000
@@ -357,10 +357,10 @@
   (setq fill-paragraph-function 'mail-mode-fill-paragraph)
   (make-local-variable 'adaptive-fill-regexp)
   (setq adaptive-fill-regexp
-	(concat "[ \t]*[a-z0-9A-Z]*>+[ \t]*\\|" 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
-	(concat "[ \t]*[a-z0-9A-Z]*>+[ \t]*\\|" adaptive-fill-first-line-regexp))
+	(concat "[ \t]*[-a-z0-9A-Z]*>+[ \t]*\\|" adaptive-fill-first-line-regexp))
   ;; `-- ' precedes the signature.  `-----' appears at the start of the
   ;; lines that delimit forwarded messages.
   ;; Lines containing just >= 3 dashes, perhaps after whitespace,