comparison lisp/gnus/gnus-agent.el @ 57153:497f0d2ca551

Revision: miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-558 Merge from gnus--rel--5.10 Patches applied: * miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-30 Update from CVS
author Miles Bader <miles@gnu.org>
date Mon, 20 Sep 2004 12:03:05 +0000
parents 55fd4f77387a
children 7fdc1df35f39 0796fc36c2bd
comparison
equal deleted inserted replaced
57152:bb857995295b 57153:497f0d2ca551
58 :group 'gnus-agent 58 :group 'gnus-agent
59 :type 'hook) 59 :type 'hook)
60 60
61 (defcustom gnus-agent-fetched-hook nil 61 (defcustom gnus-agent-fetched-hook nil
62 "Hook run when finished fetching articles." 62 "Hook run when finished fetching articles."
63 :version "21.4"
63 :group 'gnus-agent 64 :group 'gnus-agent
64 :type 'hook) 65 :type 'hook)
65 66
66 (defcustom gnus-agent-handle-level gnus-level-subscribed 67 (defcustom gnus-agent-handle-level gnus-level-subscribed
67 "Groups on levels higher than this variable will be ignored by the Agent." 68 "Groups on levels higher than this variable will be ignored by the Agent."
123 :group 'gnus-agent) 124 :group 'gnus-agent)
124 125
125 (defcustom gnus-agent-go-online 'ask 126 (defcustom gnus-agent-go-online 'ask
126 "Indicate if offline servers go online when you plug in. 127 "Indicate if offline servers go online when you plug in.
127 If this is `ask' the hook will query the user." 128 If this is `ask' the hook will query the user."
128 :version "21.1" 129 :version "21.3"
129 :type '(choice (const :tag "Always" t) 130 :type '(choice (const :tag "Always" t)
130 (const :tag "Never" nil) 131 (const :tag "Never" nil)
131 (const :tag "Ask" ask)) 132 (const :tag "Ask" ask))
132 :group 'gnus-agent) 133 :group 'gnus-agent)
133 134
176 (defcustom gnus-agent-expire-unagentized-dirs t 177 (defcustom gnus-agent-expire-unagentized-dirs t
177 "*Whether expiration should expire in unagentized directories. 178 "*Whether expiration should expire in unagentized directories.
178 Have gnus-agent-expire scan the directories under 179 Have gnus-agent-expire scan the directories under
179 \(gnus-agent-directory) for groups that are no longer agentized. 180 \(gnus-agent-directory) for groups that are no longer agentized.
180 When found, offer to remove them." 181 When found, offer to remove them."
182 :version "21.4"
181 :type 'boolean 183 :type 'boolean
182 :group 'gnus-agent) 184 :group 'gnus-agent)
183 185
184 (defcustom gnus-agent-auto-agentize-methods '(nntp nnimap) 186 (defcustom gnus-agent-auto-agentize-methods '(nntp nnimap)
185 "Initially, all servers from these methods are agentized. 187 "Initially, all servers from these methods are agentized.
186 The user may remove or add servers using the Server buffer. 188 The user may remove or add servers using the Server buffer.
187 See Info node `(gnus)Server Buffer'." 189 See Info node `(gnus)Server Buffer'."
190 :version "21.4"
188 :type '(repeat symbol) 191 :type '(repeat symbol)
189 :group 'gnus-agent) 192 :group 'gnus-agent)
190 193
191 (defcustom gnus-agent-queue-mail t 194 (defcustom gnus-agent-queue-mail t
192 "Whether and when outgoing mail should be queued by the agent. 195 "Whether and when outgoing mail should be queued by the agent.