[gnus git] branch master updated: m0-5-210-gb4f496c =1= Allow setting `message-cite-style' via customize
Lars Ingebrigtsen <[email protected]>
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via b4f496c7805e5666c4c646ca0b8d8086b614e51d (commit)
from 04580ac4011bb78e17016bfe8fbedb03a8d5dce1 (commit)
- Log -----------------------------------------------------------------
commit b4f496c7805e5666c4c646ca0b8d8086b614e51d
Author: Lars Ingebrigtsen <[email protected]>
Date: Tue Dec 25 14:08:28 2012 +0100
Allow setting `message-cite-style' via customize
* message.el (message-yank-original): When using customize to set the
value of `message-cite-style', the variable it set to a symbol that's
the name of the variable, which must then be dereferenced (bug#12616).
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cc52eee..159d598 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2012-12-25 Lars Ingebrigtsen <[email protected]>
+
+ * message.el (message-yank-original): When using customize to set the
+ value of `message-cite-style', the variable it set to a symbol that's
+ the name of the variable, which must then be dereferenced (bug#12616).
+
2012-09-13 Wolfgang Jenkner <[email protected]>
* lisp/gnus-spec.el (gnus-face-face-function): Initialize the value of
diff --git a/lisp/message.el b/lisp/message.el
index c815485..18e5e6d 100644
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -3858,7 +3858,9 @@ prefix, and don't delete any headers."
(interactive "P")
;; eval the let forms contained in message-cite-style
(eval
- `(let ,message-cite-style
+ `(let ,(if (symbolp message-cite-style)
+ (symbol-value message-cite-style)
+ message-cite-style)
(message--yank-original-internal ',arg))))
(defun message-yank-buffer (buffer)
-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.
Summary of changes:
lisp/ChangeLog | 6 ++++++
lisp/message.el | 4 +++-
2 files changed, 9 insertions(+), 1 deletions(-)
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".
The branch, master has been updated
hooks/post-receive
--
Gnus Project