From 5068ad1dfd3b11508519ddcb60338798edf2f80b Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 8 Sep 1997 10:28:45 +0000 Subject: (mail-mode): Allow dash in citation prefixes in adaptive-fill-regexp and adaptive-fill-first-line-regexp. --- lisp/mail/sendmail.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index b692f8f012c..e5f1495ca81 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el @@ -357,10 +357,10 @@ C-c C-v mail-sent-via (add a Sent-via field for each To or CC)." (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, -- cgit v1.2.1