diff options
| author | Stefan Monnier | 2004-03-05 12:56:03 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2004-03-05 12:56:03 +0000 |
| commit | fc2a68b5379de8cecbf85e5b81bd0f3743787026 (patch) | |
| tree | 847cebf42b4c085e4cc792ce9f288c37b74f044d | |
| parent | 2e8d40a1da9d5c70720920103276440f80d9345e (diff) | |
| download | emacs-fc2a68b5379de8cecbf85e5b81bd0f3743787026.tar.gz emacs-fc2a68b5379de8cecbf85e5b81bd0f3743787026.zip | |
(mail-mode): Fix last change.
| -rw-r--r-- | lisp/mail/sendmail.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 659de4f227c..932f52204c5 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el | |||
| @@ -512,8 +512,9 @@ Turning on Mail mode runs the normal hooks `text-mode-hook' and | |||
| 512 | ;; Allow using comment commands to add/remove quoting (this only does | 512 | ;; Allow using comment commands to add/remove quoting (this only does |
| 513 | ;; anything if mail-yank-prefix is set to a non-nil value). | 513 | ;; anything if mail-yank-prefix is set to a non-nil value). |
| 514 | (set (make-local-variable 'comment-start) mail-yank-prefix) | 514 | (set (make-local-variable 'comment-start) mail-yank-prefix) |
| 515 | (set (make-local-variable 'comment-start-skip) | 515 | (if mail-yank-prefix |
| 516 | (concat "^" (regexp-quote mail-yank-prefix) "[ \t]*")) | 516 | (set (make-local-variable 'comment-start-skip) |
| 517 | (concat "^" (regexp-quote mail-yank-prefix) "[ \t]*"))) | ||
| 517 | (make-local-variable 'adaptive-fill-regexp) | 518 | (make-local-variable 'adaptive-fill-regexp) |
| 518 | (setq adaptive-fill-regexp | 519 | (setq adaptive-fill-regexp |
| 519 | (concat "[ \t]*[-[:alnum:]]+>+[ \t]*\\|" | 520 | (concat "[ \t]*[-[:alnum:]]+>+[ \t]*\\|" |