Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-24 05:47:36 +00:00
Code Issues Projects Releases Packages Wiki Activity

* lisp/gnus/gnus-msg.el (gnus-setup-message): Also bind `winconf-name'.

Browse source
This commit is contained in:
Sam Steingold 2011-02-22 15:08:00 -05:00
parent 8d40723d1e
commit 7dde5efea3
2 changed files with 5 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/gnus/ChangeLog
View file

@ -1,3 +1,7 @@
2011-02-22 Sam Steingold <sds@gnu.org>
* gnus-msg.el (gnus-setup-message): Also bind `winconf-name'.
2011-02-22 Lars Ingebrigtsen <larsi@gnus.org>
* gnus-msg.el (gnus-inews-add-send-actions): Restore the winconf name

1
lisp/gnus/gnus-msg.el
View file

@ -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"))
(buffer (make-symbol "gnus-setup-message-buffer"))
(article (make-symbol "gnus-setup-message-article"))
(yanked (make-symbol "gnus-setup-yanked-articles"))