* gnus.el (gnus-message-archive-group): Quote value.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3fba14c..6b26f17 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,12 +1,14 @@
 2010-10-21  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * gnus.el (gnus-message-archive-group): Quote value.
+
        * shr.el (shr-add-font): Don't put the font properties on the newline
        or the indentation.
 
        * message.el (message-fix-before-sending): Change options when sending
        non-printable characters.
 
-       * gnus.el (gnus-update-message-archive-method): Change the default to
+       * gnus.el (gnus-message-archive-method): Change the default to
        monthly outgoing groups.
 
        * gnus-sum.el (gnus-summary-edit-article-done): Try to replace articles

diff --git a/lisp/gnus.el b/lisp/gnus.el
index b60d4e0..43af553 100644 (file)
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -1360,7 +1360,7 @@ saved \"archive\" method to be updated whenever you change the value of
   :group 'gnus-message
   :type 'boolean)
 
-(defcustom gnus-message-archive-group ((format-time-string "sent.%Y-%m"))
+(defcustom gnus-message-archive-group '((format-time-string "sent.%Y-%m"))
   "*Name of the group in which to save the messages you've written.
 This can either be a string; a list of strings; or an alist
 of regexps/functions/forms to be evaluated to return a string (or a list