[gnus git] branch master updated: n0-13-22-gf82c558

Lars Ingebrigtsen <[email protected]>
Newsgroups gmane.emacs.gnus.cvs
Message-ID <[email protected]>
       via  f82c558fbf435eaaff8f5c0fcb31637af673fb4b (commit)
      from  9f46f54dbfbce043673f5ce8d176d9941700f8f9 (commit)


- Log -----------------------------------------------------------------
commit f82c558fbf435eaaff8f5c0fcb31637af673fb4b
Author: Lars Ingebrigtsen <[email protected]>
Date:   Wed Feb 23 00:04:19 2011 -0800

    (gnus-setup-message): Define missing variable from last checkin.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c91ae14..d63e3fd 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -31,6 +31,7 @@
 
 	* gnus-msg.el (gnus-inews-add-send-actions): Restore the winconf name
 	after exit.
+	(gnus-setup-message): Define missing variable from last checkin.
 
 	* gnus-sum.el (gnus-summary-show-article): When called with t as the
 	value, show the raw article.
diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el
index 29ac431..093eec3 100644
--- a/lisp/gnus-msg.el
+++ b/lisp/gnus-msg.el
@@ -383,6 +383,7 @@ Thank you for your help in stamping out bugs.
 (defvar gnus-article-reply nil)
 (defmacro gnus-setup-message (config &rest forms)
   (let ((winconf (make-symbol "gnus-setup-message-winconf"))
+	(winconf-name (make-symbol "gnus-setup-message-winconf-name"))
 	(buffer (make-symbol "gnus-setup-message-buffer"))
 	(article (make-symbol "gnus-setup-message-article"))
 	(yanked (make-symbol "gnus-setup-yanked-articles"))
@@ -433,7 +434,7 @@ Thank you for your help in stamping out bugs.
 	   (progn
 	     ,@forms)
 	 (gnus-inews-add-send-actions ,winconf ,buffer ,article ,config
-				      ,yanked ,winconf-name)
+				      ,yanked ',winconf-name)
 	 (setq gnus-message-buffer (current-buffer))
 	 (set (make-local-variable 'gnus-message-group-art)
 	      (cons ,group ,article))
@@ -541,7 +542,7 @@ Gcc: header for archiving purposes."
 	   (gnus-post-method arg ,gnus-newsgroup-name)))
   (message-add-action
    `(progn
-      (setq gnus-current-window-configuration ,winconf-name)
+      (setq gnus-current-window-configuration ',winconf-name)
       (when (gnus-buffer-exists-p ,buffer)
 	(set-window-configuration ,winconf)))
    'exit 'postpone 'kill)

-----------------------------------------------------------------------
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   |    1 +
 lisp/gnus-msg.el |    5 +++--
 2 files changed, 4 insertions(+), 2 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
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.