summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2002-01-23 00:44:27 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2002-01-23 00:44:27 +0000
commit567a1c29d9932087148051dd7f2f12c1c5645d8d (patch)
tree8d5738fa0dd2ec74187c0de29598fd928e30d087 /lisp
parent56ce34cc166e5086c0a3fcceae87b316c423f0ce (diff)
downloademacs-567a1c29d9932087148051dd7f2f12c1c5645d8d.tar.gz
emacs-567a1c29d9932087148051dd7f2f12c1c5645d8d.tar.bz2
emacs-567a1c29d9932087148051dd7f2f12c1c5645d8d.zip
(mail-mode): ">" is not a supercite-style prefix
and is already matched by adaptive-fill-regexp.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mail/sendmail.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index 3e0f17e96b5..8497af5f7ef 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -487,11 +487,11 @@ Turning on Mail mode runs the normal hooks `text-mode-hook' and
(set (make-local-variable 'comment-start) mail-yank-prefix)
(make-local-variable 'adaptive-fill-regexp)
(setq adaptive-fill-regexp
- (concat "[ \t]*[-[:alnum:]]*>+[ \t]*\\|"
+ (concat "[ \t]*[-[:alnum:]]+>+[ \t]*\\|"
adaptive-fill-regexp))
(make-local-variable 'adaptive-fill-first-line-regexp)
(setq adaptive-fill-first-line-regexp
- (concat "[ \t]*[-[:alnum:]]*>+[ \t]*\\|"
+ (concat "[ \t]*[-[:alnum:]]+>+[ \t]*\\|"
adaptive-fill-first-line-regexp))
;; `-- ' precedes the signature. `-----' appears at the start of the
;; lines that delimit forwarded messages.