Quote symp.

diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el
index 98b94e4..11292bd 100644 (file)
--- a/lisp/gnus-msg.el
+++ b/lisp/gnus-msg.el
@@ -672,7 +672,7 @@ post using the current select method."
   (let ((articles (gnus-summary-work-articles n))
        (message-post-method
         `(lambda (arg)
   (let ((articles (gnus-summary-work-articles n))
        (message-post-method
         `(lambda (arg)

-           (gnus-post-method (eq ,symp 'a) ,gnus-newsgroup-name)))
+           (gnus-post-method (eq ',symp 'a) ,gnus-newsgroup-name)))

        article)
     (while (setq article (pop articles))
       (when (gnus-summary-select-article t nil nil article)
        article)
     (while (setq article (pop articles))
       (when (gnus-summary-select-article t nil nil article)