Mercurial > emacs
comparison lisp/gnus/gnus.el @ 111075:22eac37c58af
gnus.el (gnus-message-archive-group): Quote value.
gnus.el (gnus-message-archive-group): Mark as changed.
author | Katsumi Yamaoka <yamaoka@jpl.org> |
---|---|
date | Thu, 21 Oct 2010 02:44:47 +0000 |
parents | 28e0e0ac22e4 |
children | bf96ffd54855 |
comparison
equal
deleted
inserted
replaced
111074:9138671f67b0 | 111075:22eac37c58af |
---|---|
1354 \"archive\" ever since. If it once has been saved, it will never be | 1354 \"archive\" ever since. If it once has been saved, it will never be |
1355 updated if the value of this variable is nil, even if you change the | 1355 updated if the value of this variable is nil, even if you change the |
1356 value of `gnus-message-archive-method' afterward. If you want the | 1356 value of `gnus-message-archive-method' afterward. If you want the |
1357 saved \"archive\" method to be updated whenever you change the value of | 1357 saved \"archive\" method to be updated whenever you change the value of |
1358 `gnus-message-archive-method', set this variable to a non-nil value." | 1358 `gnus-message-archive-method', set this variable to a non-nil value." |
1359 :version "24.1" | 1359 :version "23.1" |
1360 :group 'gnus-server | 1360 :group 'gnus-server |
1361 :group 'gnus-message | 1361 :group 'gnus-message |
1362 :type 'boolean) | 1362 :type 'boolean) |
1363 | 1363 |
1364 (defcustom gnus-message-archive-group ((format-time-string "sent.%Y-%m")) | 1364 (defcustom gnus-message-archive-group '((format-time-string "sent.%Y-%m")) |
1365 "*Name of the group in which to save the messages you've written. | 1365 "*Name of the group in which to save the messages you've written. |
1366 This can either be a string; a list of strings; or an alist | 1366 This can either be a string; a list of strings; or an alist |
1367 of regexps/functions/forms to be evaluated to return a string (or a list | 1367 of regexps/functions/forms to be evaluated to return a string (or a list |
1368 of strings). The functions are called with the name of the current | 1368 of strings). The functions are called with the name of the current |
1369 group (or nil) as a parameter. | 1369 group (or nil) as a parameter. |
1379 Normally the group names returned by this variable should be | 1379 Normally the group names returned by this variable should be |
1380 unprefixed -- which implicitly means \"store on the archive server\". | 1380 unprefixed -- which implicitly means \"store on the archive server\". |
1381 However, you may wish to store the message on some other server. In | 1381 However, you may wish to store the message on some other server. In |
1382 that case, just return a fully prefixed name of the group -- | 1382 that case, just return a fully prefixed name of the group -- |
1383 \"nnml+private:mail.misc\", for instance." | 1383 \"nnml+private:mail.misc\", for instance." |
1384 :version "24.1" | |
1384 :group 'gnus-message | 1385 :group 'gnus-message |
1385 :type '(choice (const :tag "none" nil) | 1386 :type '(choice (const :tag "none" nil) |
1386 (const :tag "Weekly" ((format-time-string "sent.%Yw%U"))) | 1387 (const :tag "Weekly" ((format-time-string "sent.%Yw%U"))) |
1387 (const :tag "Monthly" ((format-time-string "sent.%Y-%m"))) | 1388 (const :tag "Monthly" ((format-time-string "sent.%Y-%m"))) |
1388 (const :tag "Yearly" ((format-time-string "sent.%Y"))) | 1389 (const :tag "Yearly" ((format-time-string "sent.%Y"))) |