[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Change in supercite behavior from 20.7 to 21.1
From: |
Stefan Monnier <address@hidden> |
Subject: |
Re: Change in supercite behavior from 20.7 to 21.1 |
Date: |
27 Oct 2001 18:12:47 -0400 |
User-agent: |
Gnus/5.09 (Gnus v5.9.0) Emacs/21.1.50 |
The following message is a courtesy copy of an article
that has been posted to gnu.emacs.help as well.
author> This is a message
author> that needs a reply.
> Under 21.1, I get the following:
author> This is a message author> that needs a reply.
This is actually unrelated to supercite.
But you're right, it's a bug that I introduced in Emacs-21.1.
The problem is that the adaptive-fill-regexp doesn't match the various
alternatives in the proper order, so it ends up matching the empty
prefix before trying to match "author>". You can patch up lisp/sendmail.el
with the patch below or fix the problem with the following hook:
(add-hook 'mail-mode-hook
(lambda ()
(setq adaptive-fill-regexp
(concat "[ \t]*[-[:alnum:]]*>+[ \t]*\\|"
(default-value 'adaptive-fill-regexp)))))
Thank you for pointing this out.
Stefan
--- sendmail.el.~1.244.~ Tue Oct 2 15:42:39 2001
+++ sendmail.el Sat Oct 27 18:03:43 2001
@@ -324,13 +324,12 @@
@@ -494,12 +486,12 @@
(set (make-local-variable 'comment-start) mail-yank-prefix)
(make-local-variable 'adaptive-fill-regexp)
(setq adaptive-fill-regexp
- (concat adaptive-fill-regexp
- "\\|[ \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 adaptive-fill-first-line-regexp
- "\\|[ \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.
;; Lines containing just >= 3 dashes, perhaps after whitespace,
Stefan
- Re: Change in supercite behavior from 20.7 to 21.1,
Stefan Monnier <address@hidden> <=