[gnus git] branch master updated: m0-5-36-g639aa37 =1= (gnus-article-read-summary-keys): Protect against the key being bound to a lambda form.
Lars Magne Ingebrigtsen <[email protected]>
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via 639aa37e369cfbe9907f3566601ff2dc337bce0d (commit)
from 0d2eaa18b926244b3558ccd8057641e9db717ec1 (commit)
- Log -----------------------------------------------------------------
commit 639aa37e369cfbe9907f3566601ff2dc337bce0d
Author: Lars Magne Ingebrigtsen <[email protected]>
Date: Tue Jun 12 01:03:24 2012 +0200
(gnus-article-read-summary-keys): Protect against the key being bound to a lambda form.
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a6e204a..20a586e 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-06-11 Lars Magne Ingebrigtsen <[email protected]>
+
+ * gnus-art.el (gnus-article-read-summary-keys): Protect against the key
+ being bound to a lambda form.
+
2012-04-14 Wolfgang Jenkner <[email protected]>
* gnus-agent.el (gnus-agent-retrieve-headers): Recalculate the range of
diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index c673ccc..b92c3b6 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -6525,7 +6525,8 @@ not have a face in `gnus-article-boring-faces'."
(ding)
(unless (member keys nosave-in-article)
(set-buffer gnus-article-current-summary))
- (when (get func 'disabled)
+ (when (and (symbolp func)
+ (get func 'disabled))
(error "Function %s disabled" func))
(call-interactively func)
(setq new-sum-point (point)))
-----------------------------------------------------------------------
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 | 5 +++++
lisp/gnus-art.el | 3 ++-
2 files changed, 7 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