diff options
| author | Miles Bader <miles@gnu.org> | 2000-12-21 02:11:01 +0000 |
|---|---|---|
| committer | Miles Bader <miles@gnu.org> | 2000-12-21 02:11:01 +0000 |
| commit | eba52a1acadf47b74216bb86b8c3d78a5e339341 (patch) | |
| tree | e5331a641d8e29ce3287f99977ffa723c2a87d95 /lisp/mail | |
| parent | 980984d8e35e2694ee280d1d556725f517174bd7 (diff) | |
| download | emacs-eba52a1acadf47b74216bb86b8c3d78a5e339341.tar.gz | |
(mail-mode): Set `comment-start' to the yank prefix.
Diffstat (limited to 'lisp/mail')
| -rw-r--r-- | lisp/mail/sendmail.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 11df955c11f..1711f6ddc10 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el @@ -475,6 +475,9 @@ Here are commands that move to a header field (and create it if there isn't): (setq normal-auto-fill-function 'mail-mode-auto-fill) (make-local-variable 'fill-paragraph-function) (setq fill-paragraph-function 'mail-mode-fill-paragraph) + ;; Allow using comment commands to add/remove quoting (this only does + ;; anything if mail-yank-prefix is set to a non-nil value). + (set (make-local-variable 'comment-start) mail-yank-prefix) (make-local-variable 'adaptive-fill-regexp) (setq adaptive-fill-regexp (concat "[ \t]*\\([-|#;>*]+ *\\|(?[0-9]+[.)] *\\)+" |