(gnus-message-archive-group): Mark as changed.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6b26f17..7491276 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,6 +1,7 @@
 2010-10-21  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
        * gnus.el (gnus-message-archive-group): Quote value.
 2010-10-21  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
        * gnus.el (gnus-message-archive-group): Quote value.

+       (gnus-message-archive-group): Mark as changed.

 
        * shr.el (shr-add-font): Don't put the font properties on the newline
        or the indentation.
 
        * shr.el (shr-add-font): Don't put the font properties on the newline
        or the indentation.

diff --git a/lisp/gnus.el b/lisp/gnus.el
index 43af553..5e30976 100644 (file)
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -1355,7 +1355,7 @@ updated if the value of this variable is nil, even if you change the
 value of `gnus-message-archive-method' afterward.  If you want the
 saved \"archive\" method to be updated whenever you change the value of
 `gnus-message-archive-method', set this variable to a non-nil value."
 value of `gnus-message-archive-method' afterward.  If you want the
 saved \"archive\" method to be updated whenever you change the value of
 `gnus-message-archive-method', set this variable to a non-nil value."

-  :version "24.1"
+  :version "23.1"

   :group 'gnus-server
   :group 'gnus-message
   :type 'boolean)
   :group 'gnus-server
   :group 'gnus-message
   :type 'boolean)


@@ -1380,6 +1380,7 @@ unprefixed -- which implicitly means \"store on the archive server\".
 However, you may wish to store the message on some other server.  In
 that case, just return a fully prefixed name of the group --
 \"nnml+private:mail.misc\", for instance."
 However, you may wish to store the message on some other server.  In
 that case, just return a fully prefixed name of the group --
 \"nnml+private:mail.misc\", for instance."

+  :version "24.1"

   :group 'gnus-message
   :type '(choice (const :tag "none" nil)
                 (const :tag "Weekly" ((format-time-string "sent.%Yw%U")))
   :group 'gnus-message
   :type '(choice (const :tag "none" nil)
                 (const :tag "Weekly" ((format-time-string "sent.%Yw%U")))