[gnus git] branch master updated: n0-17-52-gd7b9374 =1= Don't quote lambda expressions with `quote'.
Katsumi Yamaoka <[email protected]>
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via d7b93742096abf2190f34f9399b9355557864f4a (commit)
from 9e72571e781a1c4030be42a8f1acfee8f0313f07 (commit)
- Log -----------------------------------------------------------------
commit d7b93742096abf2190f34f9399b9355557864f4a
Author: Stefan Monnier <[email protected]>
Date: Mon May 23 22:11:38 2011 +0000
Don't quote lambda expressions with `quote'.
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0c856e9..d36af8c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2011-05-23 Stefan Monnier <[email protected]>
+
+ * gnus-cus.el (gnus-agent-customize-category):
+ * gnus-delay.el (gnus-delay-send-queue):
+ * gnus.el (gnus-other-frame):
+ Don't quote lambda expressions with `quote'.
+
2011-05-20 Teodor Zlatanov <[email protected]>
* gnus-sum.el (gnus-summary-hide-thread): Fix bug where moving to hide
diff --git a/lisp/gnus-cus.el b/lisp/gnus-cus.el
index 2f99abb..98f0426 100644
--- a/lisp/gnus-cus.el
+++ b/lisp/gnus-cus.el
@@ -1034,7 +1034,7 @@ articles in the thread.
(widget-create
'push-button
:notify
- '(lambda (&rest ignore)
+ (lambda (&rest ignore)
(let* ((info (assq gnus-agent-cat-name gnus-category-alist))
(widgets category-fields))
(while widgets
diff --git a/lisp/gnus-delay.el b/lisp/gnus-delay.el
index bfd1705..c632cab 100644
--- a/lisp/gnus-delay.el
+++ b/lisp/gnus-delay.el
@@ -151,8 +151,7 @@ DELAY is a string, giving the length of the time. Possible values are:
(when (gnus-group-entry group)
(gnus-activate-group group)
(add-hook 'message-send-hook
- '(lambda ()
- (message-remove-header gnus-delay-header)))
+ (lambda () (message-remove-header gnus-delay-header)))
(setq articles (nndraft-articles))
(while (setq article (pop articles))
(gnus-request-head article group)
diff --git a/lisp/gnus.el b/lisp/gnus.el
index 8cd2f06..ba40930 100644
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -4356,7 +4356,7 @@ current display is used."
(switch-to-buffer gnus-group-buffer)
(funcall gnus-other-frame-function arg)
(add-hook 'gnus-exit-gnus-hook
- '(lambda nil
+ (lambda nil
(when (and (frame-live-p gnus-other-frame-object)
(cdr (frame-list)))
(delete-frame gnus-other-frame-object))
-----------------------------------------------------------------------
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 | 7 +++++++
lisp/gnus-cus.el | 26 +++++++++++++-------------
lisp/gnus-delay.el | 3 +--
lisp/gnus.el | 10 +++++-----
4 files changed, 26 insertions(+), 20 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