(gnus-inews-make-draft): Quote article-reply.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7d29012..c7d2524 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2003-01-05  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * gnus-msg.el (gnus-inews-make-draft): Quote article-reply. 
+
        * gnus-group.el (gnus-number-of-unseen-articles-in-group):
        Protect against unactive groups.
 

diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el
index d3238d4..68a473b 100644 (file)
--- a/lisp/gnus-msg.el
+++ b/lisp/gnus-msg.el
@@ -351,7 +351,7 @@ Thank you for your help in stamping out bugs.
 (defun gnus-inews-make-draft ()
   `(lambda ()
      (gnus-inews-make-draft-meta-information
-      ,gnus-newsgroup-name ,gnus-article-reply)))
+      ,gnus-newsgroup-name ',gnus-article-reply)))
 
 (defvar gnus-article-reply nil)
 (defmacro gnus-setup-message (config &rest forms)