;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\"\210\304\307\310\"\210\304\311\310\"\210\304\312\310\"\210\304\313\310\"\210\314\315\316\317\320DD\321\322\323\324\325&\210\314\326\316\317\327DD\330\331\332\322\323\324\325&	\210\314\333\316\317\334DD\335\331\332\322\323\324\325&	\210\314\336\316\317\337DD\340\331\341\322\323\324\342&	\210\314\343\316\317\344DD\345\322\346\324\347&\210\350\343\351\332#\207" [require gnus message gnus-range autoload gnus-run-hook-with-args "gnus-util" gnus-agent-expire "gnus-agent" gnus-agent-regenerate-group gnus-agent-read-servers-validate-native gnus-agent-possibly-synchronize-flags-server custom-declare-variable gnus-open-server-hook funcall function #[0 "\300\207" [nil] 1 #1=""] "Hook called just before opening connection to the news server." :group gnus-start :type hook gnus-after-set-mark-hook #[0 "\300\207" [nil] 1 #1#] "Hook called just after marks are set in a group." :version "24.1" gnus-before-update-mark-hook #[0 "\300\207" [nil] 1 #1#] "Hook called just before marks are updated in a group." gnus-server-unopen-status #[0 "\300\207" [nil] 1 #1#] "The default status if the server is not able to open.\nIf the server is covered by Gnus agent, the possible values are\n`denied', set the server denied; `offline', set the server offline;\nnil, ask user.  If the server is not covered by Gnus agent, set the\nserver denied." "22.1" (choice (const :tag "Ask" nil) (const :tag "Deny server" denied) (const :tag "Unplug Agent" offline)) gnus-nntp-server #[0 "\300\207" [nil] 1 #1#] "The name of the host running the NNTP server." gnus-server (choice (const :tag "disable" nil) string) make-obsolete-variable gnus-select-method] 10)
#@39 The current method, for the registry.
(defvar gnus-internal-registry-spool-current-method nil (#$ . 1787))
#@84 Check whether a connection to COMMAND-METHOD has been opened.

(fn COMMAND-METHOD)
(defalias 'gnus-server-opened #[257 "\306
!\307=?\205J
\211;\203<
\211\211\203\211<\203\211\2067
\310
\"A\2067
\211\311\232\203.	\206#
\310
\n\"A\206#
\310
\"A\206#
\f\211\203[
\312\313@@@@@A@#\232\204[\211A\262
\202?\211@@\262
\206#

\211\203~
\312\313@@@A@#\232\204~\211A\262
\202d\211@\262
\206#
A\314\211\203!
\211A\262\242\315
8\262
\262
;\204\212\314\316C\3172
\211
\242\206\261	\240\210\204\277\320\321\322\"\"\210\nD\211\203\327\211@\320\321\323\"\"\210
A\266\202\202\302\210\211\242A@\324\235\203\352\312\325\242@\"\202\364\312\313\242@\242A@#\211\242B\204
\211\235\204
\310
@\"\204
\211B
\266\2020\266\204\232\203\212
\262
\314\262\202\212\266\202\211\2034
\310\"\2044


BB\211\262
\262
\202=
\211\326\327\"A@!)\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods gnus-server-status denied assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-get-function server-opened gnus-newsrc-alist gnus-command-method] 16 (#$ . 1900)])
#@179 Return the status message from COMMAND-METHOD.
If COMMAND-METHOD is a string, it is interpreted as a group name.
The method this group uses will be queried.

(fn COMMAND-METHOD)
(defalias 'gnus-status-message #[257 "\211;\203\301
!\202\f\211\302\303\"A@!)\207" [gnus-command-method gnus-find-method-for-group gnus-get-function status-message] 4 (#$ . 3381)])
#@123 Open a method for getting news.
If CONFIRM is non-nil, the user will be asked for an NNTP server.

(fn &optional CONFIRM)
(defalias 'gnus-start-news-server #[256 "\306?\205\265
\203\307\310	\311\302!\205\nB\306	$	\203Z	;\203Z	\312\230\204Z	\312\230\2044	\313\230\203;\314\315 D\202Y\316\317	\"\203V\320	\321\322\323	\324\306O\325\"!D\326\306DF\202Y\327	D@\262
\211\330\267\202|\331\314!\210\332\333\334\"\210\202\200\331\320!\210\332\333\335\"\210\202\200\331\327!\210\336\337!\210\f\203\216\340!\210\341!\206\265\342!\206\265
\206\265\343\344\345@A@\346!$!\206\265\347\324\350A@#\207" [gnus-current-select-method gnus-nntp-server gnus-secondary-servers gnus-select-method gnus-agent gnus-batch-mode nil gnus-completing-read "NNTP server" boundp "" "::" nnspool system-name string-match "^:" nnmh nnmh-directory file-name-as-directory expand-file-name 1 "~/" nnmh-get-new-mail nntp #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (nnspool 100 nnmh 112)) require gnus-message 5 "Looking up local news spool..." "Looking up mh spool..." gnus-run-hooks gnus-open-server-hook gnus-agent-read-servers-validate-native gnus-server-opened gnus-open-server gnus-y-or-n-p format-message "%s (%s) open error: `%s'.  Continue? " gnus-status-message gnus-error "Couldn't open server on %s"] 10 (#$ . 3753)])
#@75 Try to make sure that the server where GROUP exists is alive.

(fn GROUP)
(defalias 'gnus-check-group #[257 "\300
!\301
!\206\f\302
!\207" [gnus-find-method-for-group gnus-server-opened gnus-open-server] 4 (#$ . 5125)])
#@159 Check whether the connection to METHOD is down.
If METHOD is nil, use `gnus-select-method'.
If it is down, start it up (again).

(fn &optional METHOD SILENT)
(defalias 'gnus-check-server #[512 "
\206\306
;\2038

\211\203\211<\203\211\2064
\307
	\"A\2064
\211\310\232\203+\206 
\307
\n\"A\206 
\307
\"A\206 
\f\211\203X
\311\312@@@@@A@#\232\204X\211A\262
\202<\211@@\262
\206 

\211\203{
\311\312@@@A@#\232\204{\211A\262
\202a\211@\262
\206 
\"A\306\211\203
\211A\262\242\313
8\262
\262
;\204\207\306\314C\3152
\211
\242\206\256\240\210\204\274\316\317\320\"	\"\210\nD\211\203\324\211@\316\317\321\"\"\210
A\266\202\202\277\210\211\242A@\322\235\203\347\311\323\242@\"\202\361\311\312\242@\242A@#\211\242B\204
\211	\235\204
\307
@	\"\204
\211	B
\266\2020\266\204\232\203\207
\262
\306\262\202\207\266\202\211\2031
\307	\"\2041


B	B\211\262
\262
\262\324!\203@
\314\207\204^
\325\326\327@A@\330\232\203U
\330\202\\
\311\331A@\"$\210\332\333!\210\334!\211\262\204\240
\325\203u
\326\202v
\335\336@A@\330\232\203\206
\330\202\215
\311\331A@\"\203\226
\337\202\236
\311\340\341\n@!\"%\210\207" [gnus-select-method gnus-server-method-cache gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods nil assoc "native" format "%s:%s" 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil #1="") "%s" gnus-server-opened gnus-message 5 "Opening %s server%s..." #1# " on %s" gnus-run-hooks gnus-open-server-hook gnus-open-server 3 "Opening %s server%s...%s" "done" "failed: %s" nnheader-get-report-string gnus-newsrc-alist] 19 (#$ . 5353)])
#@96 Return a function symbol based on METHOD and FUNCTION.

(fn METHOD FUNCTION &optional NOERROR)
(defalias 'gnus-get-function #[770 "\204\306\307!\210;\203:
\211\203\211<\203\211\2066
\310
\"A\2066
\211\311\232\203-	\206\"
\310
\n\"A\206\"
\310
\"A\206\"
\f\211\203Z
\312\313@@@@@A@#\232\204Z\211A\262
\202>\211@@\262
\206\"

\211\203}
\312\313@@@A@#\232\204}\211A\262
\202c\211@\262
\206\"
 A\314\211\203 
\211A\262\242\315
8\262
\262
;\204\211\314\316C\3172
\211
\242\206\260	\240\210\204\276\320\321\322\"\"\210\nD\211\203\326\211@\320\321\323\"\"\210
A\266\202\202\301\210\211\242A@\324\235\203\351\312\325\242@\"\202\363\312\313\242@\242A@#\211\242B\204

\211\235\204

\310
@\"\204

\211B
\266\2020\266\204\232\203\211
\262
\314\262\202\211\266\202\211\2033
\310\"\2043


BB\211\262
\262
\262!\203W
\326
!\203M
\211@\262
\202Y
\327\330!\210\330\262
\202Y
@\211\331N
\236\211\204x
\332\312\333	#!B\262
\334\331B#\210\211A\262
\335
!\204\242
@\204\213
\306\336!\210\327@!\210\335
!\204\242
\203\235
\314\207\306\337\"\210\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods error "Attempted use of a nil select method" assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-online require nnagent gnus-method-functions intern "%s-%s" put fboundp "Trying to require a method that doesn't exist" "No such function: %s" gnus-newsrc-alist gnus-agent] 18 (#$ . 7251)])
#@15 

(fn METHOD)
(defalias 'gnus-method-denied-p #[257 "\301
\"A@\302=\207" [gnus-opened-servers assoc denied] 4 (#$ . 9087)])
(defvar gnus-backend-trace nil)
(defvar gnus-backend-trace-elapsed nil)
#@18 

(fn TYPE FORM)
(defalias 'gnus-backend-trace #[514 "\205.r\302\303!q\210\304 \210db\210\305\306!\307\310	\247\203\"\311\312	!!\202#\313$\261\210\311 \211)\207" [gnus-backend-trace gnus-backend-trace-elapsed gnus-get-buffer-create "*gnus trace*" buffer-disable-undo format-time-string "%H:%M:%S" format " %.2fs %s %S\n" float-time time-since 0] 8 (#$ . 9290)])
#@59 Open a connection to COMMAND-METHOD.

(fn COMMAND-METHOD)
(defalias 'gnus-open-server #[257 "\306\307\"\210\211;\2039
\211\211\203\211<\203\211\2064
\310
	\"A\2064
\211\311\232\203*\n\206 
\310
\"A\206 
\310
\f\"A\206 

\211\203W
\312\313@@@@@A@#\232\204W\211A\262
\202;\211@@\262
\206 
/\211\203{
\312\313@@@A@#\232\204{\211A\262
\202a\211@\262
\206 
0A\314\211\203
\211A\262\242\315
8\262
\262
;\204\207\314\316C\3172
\211
\242\206\256\n\240\210\204\274\320\321\322\"	\"\210\fD\211\203\324\211@\320\321\323\"\"\210
A\266\202\202\277\210\211\242A@\324\235\203\347\312\325\242@\"\202\361\312\313\242@\242A@#\211\242B\204
\211	\235\204
\310
@	\"\204
\211	B
\266\2020\266\204\232\203\207
\262
\314\262\202\207\266\202\211\2031
\310	\"\2041


B	B\211\262
\262
\202:
\211\310
\"\312\325@\"\310\312\325@\"\326\327!\"\204Z
\3301\"\205n

A@\205n

A@\331\230?\205n
\332A@PP\262

A@\333=\203\203
\334\335\336#\210\314\202B\337\340\"\3411\254
\3421\234
\211A@AA\"00\202\301
0\334\335\343\344!$\210\314\262
\202\301
2\203\270
\345\346!\210\202\276
\334\335\347#\210\314\262
\314\204\317
\314D\262
BA\203\343
\350=\203\337
\351\202\352\2023\203\353!\2034\203\376
4\351=\2624\2025\204\n\316\262\351\202\333\202\333\240\210\211\203!\3334\354!)\266\203\202BA@\352=\203:3\203:\353!\203:\212\355!\210)\306\356\"\210
\266\203)\207" [gnus-command-method gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-backend-trace :opening assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil #1="") "%s" gnus-methods-using address gnus-server-equal #1# "+" denied gnus-message 1 "Server %s previously determined to be down; not retrying" gnus-get-function open-server (quit) (error) "Unable to open server %s due to: %s" error-message-string debug "Quit" "Quit trying to open server %s" nnagent-open-server offline ok gnus-agent-method-p gnus-open-server gnus-agent-possibly-synchronize-flags-server :opened gnus-secondary-select-methods gnus-newsrc-alist gnus-message-archive-method debug-on-quit gnus-agent gnus-server-unopen-status gnus-batch-mode] 16 (#$ . 9666)])
#@62 Close the connection to COMMAND-METHOD.

(fn COMMAND-METHOD)
(defalias 'gnus-close-server #[257 "\211;\2033
\211\211\203\211<\203\211\206.
\306
\"A\206.
\211\307\232\203%	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203R
\310\311@@@@@A@#\232\204R\211A\262
\2026\211@@\262
\206

\211\203u
\310\311@@@A@#\232\204u\211A\262
\202[\211@\262
\206
A\312\211\203
\211A\262\242\313
8\262
\262
;\204\201\312\314C\3152	
\211
\242\206\250	\240\210\204\266\316\317\320\"\"\210\nD\211\203\316\211@\316\317\321\"\"\210
A\266\202\202\271\210\211\242A@\322\235\203\341\310\323\242@\"\202\353\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203\201
\262
\312\262\202\201\266\202\211\203+
\306\"\204+


BB\211\262
\262
\2024
\211\324\325\"A@AA\"\306\f\"\211\203T
\211A\211\326\240\266\210)\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-get-function close-server closed gnus-newsrc-alist gnus-command-method] 16 (#$ . 12171)])
#@67 Request the active file from COMMAND-METHOD.

(fn COMMAND-METHOD)
(defalias 'gnus-request-list #[257 "\211;\2033
\211\211\203\211<\203\211\206.
\306
\"A\206.
\211\307\232\203%	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203R
\310\311@@@@@A@#\232\204R\211A\262
\2026\211@@\262
\206

\211\203u
\310\311@@@A@#\232\204u\211A\262
\202[\211@\262
\206
A\312\211\203
\211A\262\242\313
8\262
\262
;\204\201\312\314C\3152	
\211
\242\206\250	\240\210\204\266\316\317\320\"\"\210\nD\211\203\316\211@\316\317\321\"\"\210
A\266\202\202\271\210\211\242A@\322\235\203\341\310\323\242@\"\202\353\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203\201
\262
\312\262\202\201\266\202\211\203+
\306\"\204+


BB\211\262
\262
\2024
\211\324\325\"A@!)\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-get-function request-list gnus-newsrc-alist gnus-command-method] 16 (#$ . 13642)])
#@116 Return the active list for SERVER.
Groups matching the IGNORED regexp are excluded.

(fn SERVER &optional IGNORED)
(defalias 'gnus-server-get-active #[513 "
\211\203\211<\203\211\206)
\306
\"A\206)
\211\307\232\203 	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203M
\310\311@@@@@A@#\232\204M\211A\262
\2021\211@@\262
\206

\211\203p
\310\311@@@A@#\232\204p\211A\262
\202V\211@\262
\206
!A\312\211\203
\211A\262\242\313
8\262
\262
;\204|\312\314C\3152
\211
\242\206\243	\240\210\204\261\316\317\320\"\"\210\nD\211\203\311\211@\316\317\321\"\"\210
A\266\202\202\264\210\211\242A@\322\235\203\334\310\323\242@\"\202\346\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203|
\262
\312\262\202|\266\202\211\203&
\306\"\204&


BB\211\262
\262
\312\324!\210r\"q\210peb\210\203G
\325\230\204G
\326!\210@\327=\203q
m\204\310
\3301j
\331`\332\312w\210`{\"B\211\2620\210\202k
\210\312y\210\202N
m\204\310
\3331\301
\312f\334=\203\211
\331\335!\"\202\267
`\325\336\312w\210
`{\262
\312f\337=\203\260
`T\262\340u\210\336\312w\210\211`{P\262
\202\224
\331
\"\266\202B\211\2620\210\202\302
\210\312y\210\202q
\210)\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil #1="") "%s" gnus-request-list #1# delete-matching-lines nntp (error) gnus-group-full-name "^ 	" (error) 34 read "^ 	\\\\" 92 2 gnus-newsrc-alist nntp-server-buffer] 17 (#$ . 15061)])
#@76 Read and update infos from COMMAND-METHOD.

(fn COMMAND-METHOD INFOS DATA)
(defalias 'gnus-finish-retrieve-group-infos #[771 ";\2033
\211\203\211<\203\211\206.
\306
\"A\206.
\211\307\232\203%	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203R
\310\311@@@@@A@#\232\204R\211A\262
\2026\211@@\262
\206

\211\203u
\310\311@@@A@#\232\204u\211A\262
\202[\211@\262
\206
A\312\211\203
\211A\262\242\313
8\262
\262
;\204\201\312\314C\3152	
\211
\242\206\250	\240\210\204\266\316\317\320\"\"\210\nD\211\203\316\211@\316\317\321\"\"\210
A\266\202\202\271\210\211\242A@\322\235\203\341\310\323\242@\"\202\353\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203\201
\262
\312\262\202\201\266\202\211\203+
\306\"\204+


BB\211\262
\262
\2024
\324\325\"\210\326\327\"A@#\324\330\"\210)\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-backend-trace :finishing gnus-get-function finish-retrieve-group-infos :finished gnus-newsrc-alist gnus-command-method] 18 (#$ . 16945)])
#@85 Start early async retrieval of data from COMMAND-METHOD.

(fn COMMAND-METHOD INFOS)
(defalias 'gnus-retrieve-group-data-early #[514 "
;\2033

\211\203\211<\203\211\206.
\306
\"A\206.
\211\307\232\203%	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203R
\310\311@@@@@A@#\232\204R\211A\262
\2026\211@@\262
\206

\211\203u
\310\311@@@A@#\232\204u\211A\262
\202[\211@\262
\206
A\312\211\203
\211A\262\242\313
8\262
\262
;\204\201\312\314C\3152	
\211
\242\206\250	\240\210\204\266\316\317\320\"\"\210\nD\211\203\316\211@\316\317\321\"\"\210
A\266\202\202\271\210\211\242A@\322\235\203\341\310\323\242@\"\202\353\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203\201
\262
\312\262\202\201\266\202\211\203+
\306\"\204+


BB\211\262
\262
\2024

\324\325\"A@\")\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-get-function retrieve-group-data-early gnus-newsrc-alist gnus-command-method] 17 (#$ . 18467)])
#@71 Request the newsgroups file from COMMAND-METHOD.

(fn COMMAND-METHOD)
(defalias 'gnus-request-list-newsgroups #[257 "\211;\2033
\211\211\203\211<\203\211\206.
\306
\"A\206.
\211\307\232\203%	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203R
\310\311@@@@@A@#\232\204R\211A\262
\2026\211@@\262
\206

\211\203u
\310\311@@@A@#\232\204u\211A\262
\202[\211@\262
\206
A\312\211\203
\211A\262\242\313
8\262
\262
;\204\201\312\314C\3152	
\211
\242\206\250	\240\210\204\266\316\317\320\"\"\210\nD\211\203\316\211@\316\317\321\"\"\210
A\266\202\202\271\210\211\242A@\322\235\203\341\310\323\242@\"\202\353\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203\201
\262
\312\262\202\201\266\202\211\203+
\306\"\204+


BB\211\262
\262
\2024
\211\324\325\"A@!)\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-get-function request-list-newsgroups gnus-newsrc-alist gnus-command-method] 16 (#$ . 19922)])
#@82 Request all new groups since DATE from COMMAND-METHOD.

(fn DATE COMMAND-METHOD)
(defalias 'gnus-request-newgroups #[514 "\211;\2033
\211\211\203\211<\203\211\206.
\306
\"A\206.
\211\307\232\203%	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203R
\310\311@@@@@A@#\232\204R\211A\262
\2026\211@@\262
\206

\211\203u
\310\311@@@A@#\232\204u\211A\262
\202[\211@\262
\206
A\312\211\203
\211A\262\242\313
8\262
\262
;\204\201\312\314C\3152	
\211
\242\206\250	\240\210\204\266\316\317\320\"\"\210\nD\211\203\316\211@\316\317\321\"\"\210
A\266\202\202\271\210\211\242A@\322\235\203\341\310\323\242@\"\202\353\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203\201
\262
\312\262\202\201\266\202\211\203+
\306\"\204+


BB\211\262
\262
\2024
\211\324\325\314#\211\205G
\211A@\"\262
)\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-get-function request-newgroups gnus-newsrc-alist gnus-command-method] 17 (#$ . 21366)])
#@69 Request a data generation from COMMAND-METHOD.

(fn COMMAND-METHOD)
(defalias 'gnus-request-regenerate #[257 "\211;\2033
\211\211\203\211<\203\211\206.
\306
\"A\206.
\211\307\232\203%	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203R
\310\311@@@@@A@#\232\204R\211A\262
\2026\211@@\262
\206

\211\203u
\310\311@@@A@#\232\204u\211A\262
\202[\211@\262
\206
A\312\211\203
\211A\262\242\313
8\262
\262
;\204\201\312\314C\3152	
\211
\242\206\250	\240\210\204\266\316\317\320\"\"\210\nD\211\203\316\211@\316\317\321\"\"\210
A\266\202\202\271\210\211\242A@\322\235\203\341\310\323\242@\"\202\353\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203\201
\262
\312\262\202\201\266\202\211\203+
\306\"\204+


BB\211\262
\262
\2024
\211\324\325\"A@!)\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-get-function request-regenerate gnus-newsrc-alist gnus-command-method] 16 (#$ . 22833)])
#@14 

(fn GROUP)
(defalias 'gnus-request-compact-group #[257 "\301
!\211\302\303\"\304\305\"\203\306\225\307O\202A@\310#)\207" [gnus-command-method gnus-find-method-for-group gnus-get-function request-compact-group string-match "^[^:]+:" 0 nil t] 6 (#$ . 24265)])
#@69 Request groups compaction from COMMAND-METHOD.

(fn COMMAND-METHOD)
(defalias 'gnus-request-compact #[257 "\211;\2033
\211\211\203\211<\203\211\206.
\306
\"A\206.
\211\307\232\203%	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203R
\310\311@@@@@A@#\232\204R\211A\262
\2026\211@@\262
\206

\211\203u
\310\311@@@A@#\232\204u\211A\262
\202[\211@\262
\206
A\312\211\203
\211A\262\242\313
8\262
\262
;\204\201\312\314C\3152	
\211
\242\206\250	\240\210\204\266\316\317\320\"\"\210\nD\211\203\316\211@\316\317\321\"\"\210
A\266\202\202\271\210\211\242A@\322\235\203\341\310\323\242@\"\202\353\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203\201
\262
\312\262\202\201\266\202\211\203+
\306\"\204+


BB\211\262
\262
\2024
\211\324\325\"A@!)\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-get-function request-compact gnus-newsrc-alist gnus-command-method] 16 (#$ . 24541)])
#@113 Request GROUP.  If DONT-CHECK, no information is required.

(fn GROUP &optional DONT-CHECK COMMAND-METHOD INFO)
(defalias 'gnus-request-group #[1025 "
\206}\306\206{
\204	\206{\307\n\"\204p
\310\311\"\2033\312\313\314\315\"\314\316\"\206/\317#\202;\312\313	@	A@#\211\203H\211<\203H\211\206e
\320
\"A\206e
\211\321\232\203Z	\206Q
\320
\f\"A\206Q
\320

\"A\206Q
9\211\203\210
\312\313@@@@@A@#\232\204\210\211A\262
\202l\211@@\262
\206Q
:\211\203\254
\312\313@@@A@#\232\204\254\211A\262
\202\222\211@\262
\206Q
;A\306\211\203O
\211A\262\242\322
8\262
\262
;\204\270\306\323C\3242@
\211
\242\206\337	\240\210\204\355\325\326\327\"\"\210\f
D\211\203
\211@\325\326\330\"\"\210
A\266\202\202\360\210\211\242A@\331\235\203
\312\332\242@\"\202\"
\312\313\242@\242A@#\211\242B\204<
\211\235\204<
\320
@\"\204<
\211B
\266\2020\266\204\232\203\270
\262
\306\262\202\270\266\202\211\203b
\320\"\204b


BB\211\262
\262
\206{\333!\206{\211\206}

\307
\n\"A@\262
\306
\203\221
\3228\211\262\203\221
\211\321\232\203\227
	\266\204\202}\211;\203\314\211\211\203\252
\211<\203\252
\211\206\307\320
\"A\206\307\211\321\232\203\274
	\206\263\320
\f\"A\206\263\320

\"A\206\2639\211\203\352

\312\313@@@@@A@#\232\204\352
\211A\262
\202\316
\211@@\262
\206\263:\211\203
\312\313@@@A@#\232\204\211A\262
\202\364
\211@\262
\206\263;A\306\211\203\261\211A\262\242\322
8\262
\262
;\204\306\323C\3242\242\211
\242\206A	\240\210\204O\325\326\327\"\"\210\f
D\211\203g\211@\325\326\330\"\"\210
A\266\202\202R\210\211\242A@\331\235\203z\312\332\242@\"\202\204\312\313\242@\242A@#\211\242B\204\236\211\235\204\236\320
@\"\204\236\211B
\266\2020\266\204\232\203
\262
\306\262\202\266\202\211\203\304\320\"\204\304

BB\211\262
\262
\202%\211A@;\203$\211\334\335@!\336P!\211AA\236\204\357\337A@DC\"\262\210<\306\211\211\204\227\211A\262\242\211\262\203\227@@=\203\364\340AA!\340AA!\306\211\3412\214\211A\262\242\211\262\203\211
@\236\211\262\2049\342\341\306\"\210\343
\"\262

\232\204
A@;\203S\211A@;\204[\342\341\306\"\210\202
A@
A@\310\344\"\203m\345!\262\310\344\"\203y\345
!\262


\232\204\204\342\341\306\"\210\266\202?0\266\206\203\364
\262
\202\364\266\203\206%
\2119\306\203\322
\203\322
\211A\262\242@\262
@
@\232\203\242A@
A@\232\203\242\346\"\204\242\306\262\202\242?\266\203\203\337\211AA\204\344\262
\202%\334\312\347@\"!\211AA\236\203
@A@\350QAABB\202
@A@\350QA@DAABBB\262
<B<
\266\203\202%\211\262
\211A@\317\232\2034\266\203\202}\211A@\204C\211@\317D\266\204\202}\211\335
@!\351\320=\">\203x\334
\336P!\236\204x\352@=\236>\203x\337\334\336P!A@DC\"\266\206\202}
\266\204\266\202\211>;\203\264>\211\203\223\211<\203\223\211\206\260\320
\"A\206\260\211\321\232\203\245	\206\234\320
\f\"A\206\234\320

\"A\206\2349\211\203\323
\312\313@@@@@A@#\232\204\323\211A\262
\202\267\211@@\262
\206\234:\211\203\367
\312\313@@@A@#\232\204\367\211A\262
\202\335\211@\262
\206\234;A\306\211\203\232\211A\262\242\322
8\262
\262
;\204\306\323C\3242\213\211
\242\206*	\240\210\2048\325\326\327\"\"\210\f
D\211\203P\211@\325\326\330\"\"\210
A\266\202\202;\210\211\242A@\331\235\203c\312\332\242@\"\202m\312\313\242@\242A@#\211\242B\204\207\211\235\204\207\320
@\"\204\207\211B
\266\2020\266\204\232\203
\262
\306\262\202\266\202\211\203\255\320\"\204\255

BB\211\262
\262
>>\353\306\204\300\354\355!\210;\203\364\211\203\323\211<\203\323\211\206\360\320
\"A\206\360\211\321\232\203\345	\206\334\320
\f\"A\206\334\320

\"A\206\3349\211\203
\312\313@@@@@A@#\232\204\211A\262
\202\367\211@@\262
\206\334:\211\2037
\312\313@@@A@#\232\2047\211A\262
\202\211@\262
\206\334;A\306\211\203\332\211A\262\242\322
8\262
\262
;\204C\306\323C\3242\313\211
\242\206j	\240\210\204x\325\326\327\"\"\210\f
D\211\203\220\211@\325\326\330\"\"\210
A\266\202\202{\210\211\242A@\331\235\203\243\312\332\242@\"\202\255\312\313\242@\242A@#\211\242B\204\307\211\235\204\307\320
@\"\204\307\211B
\266\2020\266\204\232\203C
\262
\306\262\202C\266\202\211\203\355\320\"\204\355

BB\211\262
\262
\262?\203\356
!\203\211@\262
\202\357\360!\210\360\262
\202@\211\361N
\236\211\2042\334\312\362	#!B\262
\363\361B#\210\211A\262
\364
!\204`@\204E\354\365!\210\357@!\210\364
!\204`\203[\266\306\202b\354\366\"\210\266\205\310\367\"\203r\370\225\306O\202s>A@$)\207" [gnus-override-method gnus-select-method gnus-newsrc-hashtb gnus-server-method-cache gnus-server-alist gnus-predefined-server-alist nil gethash string-match "^\\([^:+]+\\)\\(?:\\+\\([^:]*\\)\\)?:" format "%s:%s" match-string 1 2 #1="" assoc "native" 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil #1#) "%s" gnus-group-name-to-method intern symbol-name "-address" append copy-sequence --cl-block-nil-- throw delq "/\\'" directory-file-name gnus-methods-sloppily-equal "%s-address" "+" address physical-address request-group error "Attempted use of a nil select method" gnus-online require nnagent gnus-method-functions "%s-%s" put fboundp "Trying to require a method that doesn't exist" "No such function: %s" "^[^:]+:" 0 gnus-opened-servers gnus-secondary-select-methods gnus-newsrc-alist gnus-extended-servers gnus-valid-select-methods gnus-command-method gnus-agent] 24 (#$ . 25968)])
#@45 Request a description of GROUP.

(fn GROUP)
(defalias 'gnus-request-group-description #[257 "\301
!\302
\30313\211;\203\301
!@\202\211\304
!\204!\305
!\210\306\307\310\311#!!\262
0\266\202\2026\266\312\205Q\313\302\"\314\315\"\203L
\316\225\312O\202M
A@\")\207" [gnus-command-method gnus-find-method-for-group request-group-description (error) featurep require fboundp intern format "%s-%s" nil gnus-get-function string-match "^[^:]+:" 0] 10 (#$ . 31735)])
#@60 Request that GROUP get a complete rescan.

(fn GROUP INFO)
(defalias 'gnus-request-group-scan #[514 "\301!\302\30313\211;\203\301
!@\202\211\304
!\204!\305
!\210\306\307\310\311#!!\262
0\266\202\2026\266\312\205R\313\302\"\314\315\"\203L\316\225\312O\202MA@#)\207" [gnus-command-method gnus-find-method-for-group request-group-scan (error) featurep require fboundp intern format "%s-%s" nil gnus-get-function string-match "^[^:]+:" 0] 11 (#$ . 32216)])
#@42 Request the GROUP be closed.

(fn GROUP)
(defalias 'gnus-close-group #[257 "\211\306\206w
\204	\206w\307\n\"\204l
\310\311\"\203/\312\313\314\315\"\314\316\"\206+\317#\2027\312\313	@	A@#\211\203D\211<\203D\211\206a
\320
\"A\206a
\211\321\232\203V	\206M
\320
\f\"A\206M
\320

\"A\206M
/\211\203\204
\312\313@@@@@A@#\232\204\204\211A\262
\202h\211@@\262
\206M
0\211\203\250
\312\313@@@A@#\232\204\250\211A\262
\202\216\211@\262
\206M
1A\306\211\203K
\211A\262\242\322
8\262
\262
;\204\264\306\323C\3242<
\211
\242\206\333	\240\210\204\351\325\326\327\"\"\210\f
D\211\203

\211@\325\326\330\"\"\210
A\266\202\202\354\210\211\242A@\331\235\203
\312\332\242@\"\202
\312\313\242@\242A@#\211\242B\2048
\211\235\2048
\320
@\"\2048
\211B
\266\2020\266\204\232\203\264
\262
\306\262\202\264\266\202\211\203^
\320\"\204^


BB\211\262
\262
\206w\333!\206w\211\206y

\307
\n\"A@\262
\306
\203\215
\3228\211\262\203\215
\211\321\232\203\223
	\266\204\202y\211;\203\310\211\211\203\246
\211<\203\246
\211\206\303\320
\"A\206\303\211\321\232\203\270
	\206\257\320
\f\"A\206\257\320

\"A\206\257/\211\203\346

\312\313@@@@@A@#\232\204\346
\211A\262
\202\312
\211@@\262
\206\2570\211\203\n
\312\313@@@A@#\232\204\n\211A\262
\202\360
\211@\262
\206\2571A\306\211\203\255\211A\262\242\322
8\262
\262
;\204\306\323C\3242\236\211
\242\206=	\240\210\204K\325\326\327\"\"\210\f
D\211\203c\211@\325\326\330\"\"\210
A\266\202\202N\210\211\242A@\331\235\203v\312\332\242@\"\202\200\312\313\242@\242A@#\211\242B\204\232\211\235\204\232\320
@\"\204\232\211B
\266\2020\266\204\232\203
\262
\306\262\202\266\202\211\203\300\320\"\204\300

BB\211\262
\262
\202!\211A@;\203 \211\334\335@!\336P!\211AA\236\204\353\337A@DC\"\262\2102\306\211\211\204\223\211A\262\242\211\262\203\223@@=\203\360\340AA!\340AA!\306\211\3412\210\211A\262\242\211\262\203\205
@\236\211\262\2045\342\341\306\"\210\343
\"\262

\232\204
A@;\203O\211A@;\204W\342\341\306\"\210\202
A@
A@\310\344\"\203i\345!\262\310\344\"\203u\345
!\262


\232\204\200\342\341\306\"\210\266\202?0\266\206\203\360
\262
\202\360\266\203\206!
\211/\306\203\316
\203\316
\211A\262\242@\262
@
@\232\203\236A@
A@\232\203\236\346\"\204\236\306\262\202\236?\266\203\203\333\211AA\204\340\262
\202!\334\312\347@\"!\211AA\236\203\377
@A@\350QAABB\202
@A@\350QA@DAABBB\262
2B2
\266\203\202!\211\262
\211A@\317\232\2030\266\203\202y\211A@\204?\211@\317D\266\204\202y\211\335
@!\351\3203\">\203t\334
\336P!\236\204t\352@3\236>\203t\337\334\336P!A@DC\"\266\206\202y
\266\204\266\2024\3534\354\"\310\355\"\203\217
\356\225\306O\202\220
4A@\")\207" [gnus-override-method gnus-select-method gnus-newsrc-hashtb gnus-server-method-cache gnus-server-alist gnus-predefined-server-alist nil gethash string-match "^\\([^:+]+\\)\\(?:\\+\\([^:]*\\)\\)?:" format "%s:%s" match-string 1 2 #1="" assoc "native" 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil #1#) "%s" gnus-group-name-to-method intern symbol-name "-address" append copy-sequence --cl-block-nil-- throw delq "/\\'" directory-file-name gnus-methods-sloppily-equal "%s-address" "+" address physical-address gnus-get-function close-group "^[^:]+:" 0 gnus-opened-servers gnus-secondary-select-methods gnus-newsrc-alist gnus-extended-servers gnus-valid-select-methods gnus-command-method] 20 (#$ . 32698)])
#@155 Request headers for ARTICLES in GROUP.
If FETCH-OLD, retrieve all headers (or some subset thereof) in the group.

(fn ARTICLES GROUP &optional FETCH-OLD)
(defalias 'gnus-retrieve-headers #[770 "\303!	\203@\247\203\304#\202H\n\203.\305!\203.\306!\203.\307#\202H\310\311\"\312\313\"\203B\314\225\315O\202CA@$)\207" [gnus-command-method gnus-use-cache gnus-agent gnus-find-method-for-group gnus-cache-retrieve-headers gnus-online gnus-agent-method-p gnus-agent-retrieve-headers gnus-get-function retrieve-headers string-match "^[^:]+:" 0 nil] 8 (#$ . 36461)])
#@49 Request ARTICLES in GROUP.

(fn ARTICLES GROUP)
(defalias 'gnus-retrieve-articles #[514 "\301
!\302\303\"\304\305\"\203\306\225\307O\202A@#)\207" [gnus-command-method gnus-find-method-for-group gnus-get-function retrieve-articles string-match "^[^:]+:" 0 nil] 7 (#$ . 37053)])
#@87 Request active information on GROUPS from COMMAND-METHOD.

(fn GROUPS COMMAND-METHOD)
(defalias 'gnus-retrieve-groups #[514 "\211;\2033
\211\211\203\211<\203\211\206.
\306
\"A\206.
\211\307\232\203%	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203R
\310\311@@@@@A@#\232\204R\211A\262
\2026\211@@\262
\206

\211\203u
\310\311@@@A@#\232\204u\211A\262
\202[\211@\262
\206
A\312\211\203
\211A\262\242\313
8\262
\262
;\204\201\312\314C\3152	
\211
\242\206\250	\240\210\204\266\316\317\320\"\"\210\nD\211\203\316\211@\316\317\321\"\"\210
A\266\202\202\271\210\211\242A@\322\235\203\341\310\323\242@\"\202\353\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203\201
\262
\312\262\202\201\266\202\211\203+
\306\"\204+


BB\211\262
\262
\2024
\211\324\325\"A@\")\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-get-function retrieve-groups gnus-newsrc-alist gnus-command-method] 17 (#$ . 37347)])
#@90 Return the type (`post' or `mail') of GROUP (and ARTICLE).

(fn GROUP &optional ARTICLE)
(defalias 'gnus-request-type #[513 "\301!\302@\30314\211;\203\301
!@\202\211\304
!\204\"\305
!\210\306\307\310\311#!!\262
0\266\202\2027\266\312\204>\313\202T\314\302\"\315\316\"\203Q\317\225\312O\202R\")\207" [gnus-command-method gnus-find-method-for-group request-type (error) featurep require fboundp intern format "%s-%s" nil unknown gnus-get-function string-match "^[^:]+:" 0] 11 (#$ . 38793)])
#@104 Change the status of a group.
Valid statuses include `subscribe' and `unsubscribe'.

(fn GROUP STATUS)
(defalias 'gnus-request-update-group-status #[514 "\301!\302@\30314\211;\203\301
!@\202\211\304
!\204\"\305
!\210\306\307\310\311#!!\262
0\266\202\2027\266\312\205S\313\302\"\314\315\"\203M\316\225\312O\202NA@#)\207" [gnus-command-method gnus-find-method-for-group request-update-group-status (error) featurep require fboundp intern format "%s-%s" nil gnus-get-function string-match "^[^:]+:" 0] 11 (#$ . 39312)])
#@59 Set marks on articles in the back end.

(fn GROUP ACTION)
(defalias 'gnus-request-set-mark #[514 "\302!\303@\30414\211;\203\302
!@\202\211\305
!\204\"\306
!\210\307\310\311\312#!!\262
0\266\202\2027\266\313\204>\211\202]\314\303\"\315\316\"\203Q\317\225\313O\202RA@#\210\320	#)\207" [gnus-command-method gnus-after-set-mark-hook gnus-find-method-for-group request-set-mark (error) featurep require fboundp intern format "%s-%s" nil gnus-get-function string-match "^[^:]+:" 0 gnus-run-hook-with-args] 11 (#$ . 39858)])
#@101 Allow the back end to change the mark the user tries to put on an article.

(fn GROUP ARTICLE MARK)
(defalias 'gnus-request-update-mark #[771 "\302!\303@\30414\211;\203\302
!@\202\211\305
!\204\"\306
!\210\307\310\311\312#!!\262
0\266\202\2027\266\313\204>\211\202\\\314	$\210\315\303\"\316\317\"\203X\320\225\313O\202Y#)\207" [gnus-command-method gnus-before-update-mark-hook gnus-find-method-for-group request-update-mark (error) featurep require fboundp intern format "%s-%s" nil gnus-run-hook-with-args gnus-get-function string-match "^[^:]+:" 0] 12 (#$ . 40409)])
#@179 Request the ARTICLE in GROUP.
ARTICLE can either be an article number or an article Message-ID.
If BUFFER, insert the article in that group.

(fn ARTICLE GROUP &optional BUFFER)
(defalias 'gnus-request-article #[770 "\301!\302\303\"\304\305\"\203\306\225\307O\202A@$)\207" [gnus-command-method gnus-find-method-for-group gnus-get-function request-article string-match "^[^:]+:" 0 nil] 8 (#$ . 41012)])
#@98 Request the headers in the thread containing the article specified by HEADER.

(fn HEADER GROUP)
(defalias 'gnus-request-thread #[514 "\301
!\302\303\"\304\305\"\203\306\225\307O\202\")\207" [gnus-command-method gnus-find-method-for-group gnus-get-function request-thread string-match "^[^:]+:" 0 nil] 7 (#$ . 41433)])
#@221 Activate and select GROUP with the given MESSAGE-ID selected.
Returns the article number of the message.

If GROUP is not already selected, the message will be the only one in
the group's summary.

(fn GROUP MESSAGE-ID)
(defalias 'gnus-select-group-with-message-id #[514 "\300\301\302#\303\301\304#\210\305\306#\216\307\310\311\310\312\313&\210)\210\314!\3151<\316!\211\2040\317\320\321\"\210\322\310\211\211$\210\211\262
0\207
\203C\323 \210\324\317\"\207" [gnus-group-get-parameter display :allow-list gnus-group-set-parameter 0 make-closure #[0 "\302\300\303\301#\207" [V0 V1 gnus-group-set-parameter display] 4] gnus-summary-read-group-1 nil :no-article :no-display (-1) gnus-summary-setup-buffer (error) gnus-summary-insert-subject signal error "message-id not in group" gnus-summary-select-article gnus-summary-exit apply] 10 (#$ . 41769)])
#@127 Return the simplest representation of the name of GROUP.
This is the string that Gnus uses to identify the group.

(fn GROUP)
(defalias 'gnus-simplify-group-name #[257 "\300\301\302\"\203
\303\225\304O\202
\305!\"\207" [gnus-group-prefixed-name string-match "^[^:]+:" 0 nil gnus-group-method] 5 (#$ . 42636)])
#@192 Look up the current article in the group where it originated.
This command only makes sense for groups shows articles gathered
from other groups -- for instance, search results and the like.
(defalias 'gnus-warp-to-article #[0 "\303!\304	@\30514\211;\203\303
!@\202\211\306
!\204\"\307
!\210\310\311\312\313#!!\262
0\266\202\2027\266\314\203B\315	\304\" \206N\316\302!\205N\n\205N\317 )\207" [gnus-newsgroup-name gnus-command-method gnus-registry-enabled gnus-find-method-for-group warp-to-article (error) featurep require fboundp intern format "%s-%s" nil gnus-get-function boundp gnus-try-warping-via-registry] 9 (#$ . 42959) [nil (gnus-summary-mode)]])
#@59 Request the head of ARTICLE in GROUP.

(fn ARTICLE GROUP)
(defalias 'gnus-request-head #[514 "\304
!\305\306\307#\310\211	\203&\247\203&\311\"\203&B\262\307\262
\202h\312\"\2038B\262\307\262
\202h\313!\203_\n?\205V\314\315\"\203U\316\225\310O\202VA@#\262\202h\317\"\262\307\262
\211\203\204rq\210eb\210\320\321\310\307#\203\200`Sd|\210\322 \210)
)\207" [gnus-command-method gnus-use-cache gnus-override-method nntp-server-buffer gnus-find-method-for-group gnus-get-function request-head t nil gnus-cache-request-article gnus-agent-request-article fboundp string-match "^[^:]+:" 0 gnus-request-article search-forward "\n\n" nnheader-fold-continuation-lines] 10 (#$ . 43638)])
#@59 Request the body of ARTICLE in GROUP.

(fn ARTICLE GROUP)
(defalias 'gnus-request-body #[514 "\303
!\304\305\306#\307\211	\203&\247\203&\310\"\203&B\262\306\262
\202c\311\"\2038B\262\306\262
\202c\312!\203Z\313\314\"\203P\315\225\307O\202QA@#\262\202c\316\"\262\306\262
\211\203|r\nq\210eb\210\317\320\307\306#\203{e`S|\210)
)\207" [gnus-command-method gnus-use-cache nntp-server-buffer gnus-find-method-for-group gnus-get-function request-body t nil gnus-cache-request-article gnus-agent-request-article fboundp string-match "^[^:]+:" 0 gnus-request-article search-forward "\n\n"] 10 (#$ . 44358)])
#@68 Post the current buffer using COMMAND-METHOD.

(fn COMMAND-METHOD)
(defalias 'gnus-request-post #[257 "\211;\2033
\211\211\203\211<\203\211\206.
\306
\"A\206.
\211\307\232\203%	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203R
\310\311@@@@@A@#\232\204R\211A\262
\2026\211@@\262
\206

\211\203u
\310\311@@@A@#\232\204u\211A\262
\202[\211@\262
\206
A\312\211\203
\211A\262\242\313
8\262
\262
;\204\201\312\314C\3152	
\211
\242\206\250	\240\210\204\266\316\317\320\"\"\210\nD\211\203\316\211@\316\317\321\"\"\210
A\266\202\202\271\210\211\242A@\322\235\203\341\310\323\242@\"\202\353\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203\201
\262
\312\262\202\201\266\202\211\203+
\306\"\204+


BB\211\262
\262
\2024
\211\324\325\"A@!)\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-get-function request-post gnus-newsrc-alist gnus-command-method] 16 (#$ . 45001)])
#@104 Expunge GROUP, which is removing articles that have been marked as deleted.

(fn GROUP COMMAND-METHOD)
(defalias 'gnus-request-expunge-group #[514 "\211;\2033
\211\211\203\211<\203\211\206.
\306
\"A\206.
\211\307\232\203%	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203R
\310\311@@@@@A@#\232\204R\211A\262
\2026\211@@\262
\206

\211\203u
\310\311@@@A@#\232\204u\211A\262
\202[\211@\262
\206
A\312\211\203
\211A\262\242\313
8\262
\262
;\204\201\312\314C\3152	
\211
\242\206\250	\240\210\204\266\316\317\320\"\"\210\nD\211\203\316\211@\316\317\321\"\"\210
A\266\202\202\271\210\211\242A@\322\235\203\341\310\323\242@\"\202\353\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203\201
\262
\312\262\202\201\266\202\211\203+
\306\"\204+


BB\211\262
\262
\2024
\211\324\325\"\326\327\"\203J
\330\225\312O\202K
A@\")\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-get-function request-expunge-group string-match "^[^:]+:" 0 gnus-newsrc-alist gnus-command-method] 17 (#$ . 46421)])
#@148 Request a SCAN being performed in GROUP from COMMAND-METHOD.
If GROUP is nil, all groups on COMMAND-METHOD are scanned.

(fn GROUP COMMAND-METHOD)
(defalias 'gnus-request-scan #[514 "
\203\n\305!\202\211\306\204\307!?\2059\310\311\"\2055\312\313\"\2034\314\225\315O\2025A@\"+\207" [gnus-plugged mail-source-plugged gnus-inhibit-demon gnus-command-method gnus-internal-registry-spool-current-method gnus-find-method-for-group t gnus-agent-method-p gnus-get-function request-scan string-match "^[^:]+:" 0 nil] 6 (#$ . 47959)])
#@28 

(fn INFO COMMAND-METHOD)
(defalias 'gnus-request-update-info #[514 "\306
@\30710\211;\203\310
!@\202\211\311
!\204\312
!\210\313\314\315\316#!!\262
0\266\202\2023\266\317\205\214
\211;\203i
\211\211\203I\211<\203I\211\206d
\320
\"A\206d
\211\321\232\203[	\206P
\320
\n\"A\206P
\320
\"A\206P
\f\211\203\210
\315\322@@@@@A@#\232\204\210\211A\262
\202l\211@@\262
\206P

\211\203\253
\315\322@@@A@#\232\204\253\211A\262
\202\221\211@\262
\206P
 A\317\211\203N
\211A\262\242\323
8\262
\262
;\204\267\317\324C\3252?
\211
\242\206\336	\240\210\204\354\326\327\330\"\"\210\nD\211\203
\211@\326\327\331\"\"\210
A\266\202\202\357\210\211\242A@\332\235\203
\315\333\242@\"\202!
\315\322\242@\242A@#\211\242B\204;
\211\235\204;
\320
@\"\204;
\211B
\266\2020\266\204\232\203\267
\262
\317\262\202\267\266\202\211\203a
\320\"\204a


BB\211\262
\262
\202j
\211!\334!\306\"@\335\336\"\203\202
\211\337\225\317O\202\203
\211\262
!A@#)\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods request-update-info (error) gnus-find-method-for-group featurep require fboundp intern format "%s-%s" nil assoc "native" "%s:%s" 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-get-function string-match "^[^:]+:" 0 gnus-newsrc-alist gnus-command-method] 17 (#$ . 48514)])
#@68 Request that COMMAND-METHOD update INFO.

(fn INFO COMMAND-METHOD)
(defalias 'gnus-request-marks #[514 "\211;\2033
\211\211\203\211<\203\211\206.
\306
\"A\206.
\211\307\232\203%	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203R
\310\311@@@@@A@#\232\204R\211A\262
\2026\211@@\262
\206

\211\203u
\310\311@@@A@#\232\204u\211A\262
\202[\211@\262
\206
$A\312\211\203
\211A\262\242\313
8\262
\262
;\204\201\312\314C\3152	
\211
\242\206\250	\240\210\204\266\316\317\320\"\"\210\nD\211\203\316\211@\316\317\321\"\"\210
A\266\202\202\271\210\211\242A@\322\235\203\341\310\323\242@\"\202\353\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203\201
\262
\312\262\202\201\266\202\211\203+
\306\"\204+


BB\211\262
\262
\2024
\211%\324%@\3251g
\211;\203J
\326
!@\202K
\211\327
!\204U
\330
!\210\331\332\310\333#!!\262
0\266\202\202j
\266\312\205\277

@\334%\324\"\335\336\"\203\203

\337\225\312O\202\204

%A@#\205\275
\340
&\"\211@\211\341V\203\272
\211\342U\203\244
\341\202\250
\341
SB\3428\343
C\"AA\211\240\266\266\202\262
)\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" request-marks (error) gnus-find-method-for-group featurep require fboundp intern "%s-%s" gnus-get-function string-match "^[^:]+:" 0 gethash 1 2 gnus-range-add gnus-newsrc-alist gnus-command-method gnus-active-hashtb] 17 (#$ . 50194)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put gnus-request-marks speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@39 

(fn ARTICLES GROUP &optional FORCE)
(defalias 'gnus-request-expire-articles #[770 "\303!\304\305\306\307\"\"\310\311\312\"
\313\314\"\203#\315\225\305O\202$A@$\n\203C\316!\203C\317\"\211\203B\320
\321#\210\210*\207" [gnus-command-method gnus-inhibit-demon gnus-agent gnus-find-method-for-group delq nil mapcar #[257 "\211\300Y\205\211\207" [0] 3 "\n\n(fn N)"] t gnus-get-function request-expire-articles string-match "^[^:]+:" 0 gnus-agent-method-p gnus-sorted-difference gnus-agent-expire force] 10 (#$ . 52203)])
#@77 

(fn ARTICLE GROUP SERVER ACCEPT-FUNCTION &optional LAST MOVE-IS-INTERNAL)
(defalias 'gnus-request-move-article #[1540 "\302!\303\304\"\305\306\"\203\307\225\310O\202A@&\211\203>	\203>\311!\203>\312C\"\210)\207" [gnus-command-method gnus-agent gnus-find-method-for-group gnus-get-function request-move-article string-match "^[^:]+:" 0 nil gnus-agent-method-p gnus-agent-unfetch-articles] 13 (#$ . 52750)])
#@54 

(fn GROUP &optional COMMAND-METHOD LAST NO-ENCODE)
(defalias 'gnus-request-accept-article #[1025 ";\2033
\211\203\211<\203\211\206.
\306
\"A\206.
\211\307\232\203%	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203R
\310\311@@@@@A@#\232\204R\211A\262
\2026\211@@\262
\206

\211\203u
\310\311@@@A@#\232\204u\211A\262
\202[\211@\262
\206
\"A\312\211\203
\211A\262\242\313
8\262
\262
;\204\201\312\314C\3152	
\211
\242\206\250	\240\210\204\266\316\317\320\"\"\210\nD\211\203\316\211@\316\317\321\"\"\210
A\266\202\202\271\210\211\242A@\322\235\203\341\310\323\242@\"\202\353\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203\201
\262
\312\262\202\201\266\202\211\203+
\306\"\204+


BB\211\262
\262
\2024
\211#\204J
;\203J
\324!\206H
\325!#db\210n\204T
\326c\210\211\204k
$$\327 \210\214\330 \210\331 \210)\332 \210)#\206s
\324!\333#\334\";\203\221
\335\336\"\203\215
\337\225\312O\202\222
\202\222
#A@#
#%\203\264
\340#!\203\264
\211A\203\264
\341AC\"\210)\262
)\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-find-method-for-group gnus-group-name-to-method "\n" message-options-set-recipient message-narrow-to-head mail-encode-encoded-word-buffer message-encode-message-body gnus-get-function request-accept-article string-match "^[^:]+:" 0 gnus-agent-method-p gnus-agent-regenerate-group gnus-newsrc-alist gnus-command-method message-options gnus-agent] 20 (#$ . 53194)])
#@49 

(fn ARTICLE GROUP BUFFER &optional NO-ENCODE)
(defalias 'gnus-request-replace-article #[1027 "\211\204\303 \210\214\304 \210\305 \210)\306 \210)\307!@\310\311\312\"!\313\314\"\2030\315\225\316O\2021#	\203D\317\n!\203D\320C\"\210\207" [message-options gnus-agent gnus-command-method message-options-set-recipient message-narrow-to-head mail-encode-encoded-word-buffer message-encode-message-body gnus-group-name-to-method intern format "%s-request-replace-article" string-match "^[^:]+:" 0 nil gnus-agent-method-p gnus-agent-regenerate-group] 10 (#$ . 55145)])
#@76 Request a new buffer restored to the state of ARTICLE.

(fn ARTICLE GROUP)
(defalias 'gnus-request-restore-buffer #[514 "\301
!\302\303\"\304\305\"\203\306\225\307O\202A@#)\207" [gnus-command-method gnus-find-method-for-group gnus-get-function request-restore-buffer string-match "^[^:]+:" 0 nil] 7 (#$ . 55732)])
#@44 

(fn GROUP &optional COMMAND-METHOD ARGS)
(defalias 'gnus-request-create-group #[769 "
;\2033

\211\203\211<\203\211\206.
\306
\"A\206.
\211\307\232\203%	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203R
\310\311@@@@@A@#\232\204R\211A\262
\2026\211@@\262
\206

\211\203u
\310\311@@@A@#\232\204u\211A\262
\202[\211@\262
\206
A\312\211\203
\211A\262\242\313
8\262
\262
;\204\201\312\314C\3152	
\211
\242\206\250	\240\210\204\266\316\317\320\"\"\210\nD\211\203\316\211@\316\317\321\"\"\210
A\266\202\202\271\210\211\242A@\322\235\203\341\310\323\242@\"\202\353\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203\201
\262
\312\262\202\201\266\202\211\203+
\306\"\204+


BB\211\262
\262
\2024

\206:
\324!\325\326\"\327\330\"\203P
\331\225\312O\202Q
A@#)\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" gnus-find-method-for-group gnus-get-function request-create-group string-match "^[^:]+:" 0 gnus-newsrc-alist gnus-command-method] 18 (#$ . 56063)])
#@30 

(fn GROUP &optional FORCE)
(defalias 'gnus-request-delete-group #[513 "\301!\302\303\"\304\305\"\203\306\225\307O\202A@#\211\203)\310!\210\311!\210)\207" [gnus-command-method gnus-find-method-for-group gnus-get-function request-delete-group string-match "^[^:]+:" 0 nil gnus-cache-delete-group gnus-agent-delete-group] 6 (#$ . 57568)])
#@23 

(fn GROUP NEW-NAME)
(defalias 'gnus-request-rename-group #[514 "\301!\302\303\"\304\305\"\203\306\225\307O\202\304\305\"\203'\306\225\307O\202(A@#\211\203:\310\"\210\311\"\210)\207" [gnus-command-method gnus-find-method-for-group gnus-get-function request-rename-group string-match "^[^:]+:" 0 nil gnus-cache-rename-group gnus-agent-rename-group] 7 (#$ . 57927)])
(defalias 'gnus-close-backends #[0 "\303\304\211
\211A\262\242\211\205&\305\306	@\307P!\211\262!\203\211 \210\202*\207" [gnus-valid-select-methods gnus-command-method gnus-inhibit-demon t nil fboundp intern "-request-close"] 7])
#@23 

(fn COMMAND-METHOD)
(defalias 'gnus-asynchronous-p #[257 "\301
\302\303#\304
!\205
\211 )\207" [gnus-command-method gnus-get-function asynchronous-p t fboundp] 5 (#$ . 58561)])
#@23 

(fn COMMAND-METHOD)
(defalias 'gnus-remove-denial #[257 "\211;\2033
\211\211\203\211<\203\211\206.
\306
\"A\206.
\211\307\232\203%	\206
\306
\n\"A\206
\306
\"A\206
\f\211\203R
\310\311@@@@@A@#\232\204R\211A\262
\2026\211@@\262
\206

\211\203u
\310\311@@@A@#\232\204u\211A\262
\202[\211@\262
\206
A\312\211\203
\211A\262\242\313
8\262
\262
;\204\201\312\314C\3152	
\211
\242\206\250	\240\210\204\266\316\317\320\"\"\210\nD\211\203\316\211@\316\317\321\"\"\210
A\266\202\202\271\210\211\242A@\322\235\203\341\310\323\242@\"\202\353\310\311\242@\242A@#\211\242B\204
\211\235\204
\306
@\"\204
\211B
\266\2020\266\204\232\203\201
\262
\312\262\202\201\266\202\211\203+
\306\"\204+


BB\211\262
\262
\2024
\211\306\f\"\211A@\211\324=\205H

A\325\240)\207" [gnus-server-method-cache gnus-select-method gnus-server-alist gnus-predefined-server-alist gnus-opened-servers gnus-secondary-select-methods assoc "native" format "%s:%s" nil 4 t server-name mapc make-closure #[257 "\211A\300\242\232\205
\301\302@\"\207" [V0 throw server-name] 4 "\n\n(fn NAME-METHOD)"] #[257 "\302
A\300\242\"\205\211	\235\204\211	B\303\304@\"\207" [V0 gnus-server-method-cache gnus-methods-equal-p throw server-name] 4 "\n\n(fn NAME-METHOD)"] (nil "") "%s" denied closed gnus-newsrc-alist gnus-command-method] 16 (#$ . 58749)])
(provide 'gnus-int)