(mail-mode): Set `comment-start' to the yank prefix.

diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index 11df955c11ff83828c2dc543ac1086e170eaf0d8..1711f6ddc10ff2f86f53e5a781f3d318fb3b241e 100644 (file)
--- 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]+[.)] *\\)+"