mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-03 11:33:37 +00:00
Code Issues Releases Activity

(message-mode): Fix last change.

Browse Source
This commit is contained in:
Stefan Monnier 2004-03-05 12:56:55 +00:00
parent fc2a68b537
commit 528f876a84
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/gnus/message.el
View File

@ -1531,9 +1531,10 @@ M-RET `message-newline-and-reformat' (break the line and reformat)."
(set (make-local-variable 'message-mime-part) 0)
(message-setup-fill-variables)
;; Allow using comment commands to add/remove quoting.
(set (make-local-variable 'comment-start) message-yank-prefix)
(set (make-local-variable 'comment-start-skip)
(concat "^" (regexp-quote message-yank-prefix) "[ \t]*"))
(when message-yank-prefix
(set (make-local-variable 'comment-start) message-yank-prefix)
(set (make-local-variable 'comment-start-skip)
(concat "^" (regexp-quote message-yank-prefix) "[ \t]*")))
;;(when (fboundp 'mail-hist-define-keys)
;; (mail-hist-define-keys))
(if (featurep 'xemacs)