Changes committed gnus/lisp (ChangeLog message.el)
"Reiner Steib" <[email protected]>
| Newsgroups | gmane.emacs.gnus.commits |
|---|---|
| Message-ID | <[email protected]> |
Modified: ChangeLog message.el * message.el (message-signature-separator): Change default. Improve custom type. (message-cite-function): Change default to message-cite-original-without-signature. Index: ChangeLog diff -u gnus/lisp/ChangeLog:7.1816 gnus/lisp/ChangeLog:7.1817 --- ChangeLog:7.1816 Mon Mar 24 19:50:18 2008 +++ ChangeLog Mon Mar 24 20:38:12 2008 @@ -1,5 +1,10 @@ 2008-03-24 Reiner Steib <[email protected]> + * message.el (message-signature-separator): Change default. Improve + custom type. + (message-cite-function): Change default to + message-cite-original-without-signature. + * gnus-sum.el (gnus-summary-make-menu-bar): Add message-cite-function toggle. Index: message.el diff -u gnus/lisp/message.el:7.254 gnus/lisp/message.el:7.255 --- message.el:7.254 Mon Mar 24 19:24:54 2008 +++ message.el Mon Mar 24 20:38:12 2008 @@ -415,9 +415,17 @@ ;;; End of variables adopted from `message-utils.el'. -(defcustom message-signature-separator "^-- *$" - "Regexp matching the signature separator." - :type 'regexp +(defcustom message-signature-separator "^-- $" + "Regexp matching the signature separator. +This variable is used to strip off the signature from quoted text +when `message-cite-function' is +`message-cite-original-without-signature'. Most useful values +are \"^-- $\" (strict) and \"^-- *$\" (loose; allow missing +whitespace)." + :type '(choice (const :tag "strict" "^-- $") + (const :tag "loose" "^-- *$") + regexp) + :version "23.1" ;; No Gnus (changed default) :link '(custom-manual "(message)Various Message Variables") :group 'message-various) @@ -1004,7 +1012,7 @@ :link '(custom-manual "(message)Insertion Variables") :type 'integer) -(defcustom message-cite-function 'message-cite-original +(defcustom message-cite-function 'message-cite-original-without-signature "*Function for citing an original message. Predefined functions include `message-cite-original' and `message-cite-original-without-signature'. @@ -1014,6 +1022,7 @@ (function-item sc-cite-original) (function :tag "Other")) :link '(custom-manual "(message)Insertion Variables") + :version "23.1" ;; No Gnus (changed default) :group 'message-insertion) (defcustom message-indent-citation-function 'message-indent-citation