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



(byte-code "\302\303!\210\302\304!\210\302\305!\210\302\306!\210\307\236\203#\307\236A\310\311\312\"\240\210\202.\307\310\311\312\"\313\211FB\307	\236\204:\307\314D	B\313\207" [nnoo-definition-alist nnoo-state-alist require nnheader nnoo gnus-agent nnml nnagent mapcar list (nnml) nil "*internal-non-initialized-backend*"] 4)
(defconst nnagent-version "nnagent 1.0")
#@92 Internal variable.

This is a Gnus server variable.  See Info node `(gnus)Select Methods'.
(defvar nnagent-directory nil (#$ . 459))
(nnoo-define 'nnagent-directory '(nnml-directory))
#@92 Internal variable.

This is a Gnus server variable.  See Info node `(gnus)Select Methods'.
(defvar nnagent-active-file nil (#$ . 649))
(nnoo-define 'nnagent-active-file '(nnml-active-file))
#@92 Internal variable.

This is a Gnus server variable.  See Info node `(gnus)Select Methods'.
(defvar nnagent-newsgroups-file nil (#$ . 845))
(nnoo-define 'nnagent-newsgroups-file '(nnml-newsgroups-file))
#@92 Internal variable.

This is a Gnus server variable.  See Info node `(gnus)Select Methods'.
(defvar nnagent-get-new-mail nil (#$ . 1053))
(byte-code "\300\301\302\"\210\303\304\305\"\210\306\304!\210\303\307\310\"\210\306\307!\210\303\311\312\"\210\306\311!\210\303\313\314\"\210\306\313!\207" [nnoo-define nnagent-get-new-mail (nnml-get-new-mail) defalias nnagent-server-opened #[256 "\300\301\"\207" [nnoo-server-opened nnagent] 4 "\n\n(fn &optional SERVER)"] nnoo-register-function nnagent-status-message #[256 "\300\301\"\207" [nnoo-status-message nnagent] 4 "\n\n(fn &optional SERVER)"] nnagent-close-server #[512 "\300\301\"\207" [nnoo-close-server nnagent] 5 "\n\n(fn &optional SERVER DEFS)"] nnagent-open-server #[513 "\300\301#\207" [nnoo-change-server nnagent] 6 "\n\n(fn SERVER &optional DEFS)"]] 3)
#@15 

(fn SERVER)
(defalias 'nnagent-server #[257 "\211\205\n\301\302@#\207" [gnus-command-method format "%s+%s"] 5 (#$ . 1874)])
#@30 

(fn SERVER &optional DEFS)
(defalias 'nnagent-open-server #[513 "\302\303\304\305	@!\306	A@\307\232\203\310\202	A@Q!\306#D\311\312\313!D\314\312\315!D\316BBB\262
\317\320\321!#\210\303\304\305	@!\306	A@\307\232\203I\310\202L	A@Q!\306#\322\3231\\\324!0\202e\325\326\"\211\262\262
\204w\327 \210\330\320\206u\325\331\"\"\207\332\333!!\204\210\327 \210\330\320\334#\207\330\320\335$\210\336\207" [gnus-agent-directory gnus-command-method nnagent-directory nnheader-concat nnheader-translate-file-chars symbol-name "/" "" "unnamed" nnagent-active-file gnus-agent-lib-file "active" nnagent-newsgroups-file "newsgroups" ((nnagent-get-new-mail nil)) nnoo-change-server nnagent nnagent-server nil (ftp-error) file-exists-p format "%s" nnagent-close-server nnheader-report "No such file or directory: %s" file-directory-p file-truename "Not a directory: %s" "Opened server %s using directory %s" t] 10 (#$ . 2009)])
(nnoo-register-function 'nnagent-open-server)
#@32 

(fn GROUPS &optional SERVER)
(defalias 'nnagent-retrieve-groups #[513 "\212\300\301\302!!\203\303\301\302!!\210\304\202&\300\301\305!!\203%\303\301\305!!\210\306\202&\307)\207" [file-exists-p gnus-agent-lib-file "groups" nnmail-find-file groups "active" active nil] 5 (#$ . 2995)])
(nnoo-register-function 'nnagent-retrieve-groups)
#@22 

(fn GROUP ARTICLE)
(defalias 'nnagent-request-type #[514 "\211;?\205Y\302\303	@\30418\211;\203\305
!@\202\211\306
!\204&\307
!\210\310\311\312\313#!!\262
0\266\202\202;\266\302\204B\314\202X\315	\303\"\316\317\"\203U\320\225\302O\202V\")\207" [gnus-agent gnus-command-method nil request-type (error) gnus-find-method-for-group featurep require fboundp intern format "%s-%s" unknown gnus-get-function string-match "^[^:]+:" 0] 11 (#$ . 3340)])
#@20 

(fn DATE SERVER)
(defalias 'nnagent-request-newgroups #[514 "\300\207" [nil] 3 (#$ . 3812)])
(nnoo-register-function 'nnagent-request-newgroups)
#@36 

(fn GROUP INFO &optional SERVER)
(defalias 'nnagent-request-update-info #[770 "\300\207" [nil] 4 (#$ . 3965)])
(nnoo-register-function 'nnagent-request-update-info)
#@25 

(fn &optional SERVER)
(defalias 'nnagent-request-post #[256 "\301\302\"\210\303\304\305\306\211$\207" [gnus-command-method gnus-agent-insert-meta-information news gnus-request-accept-article "nndraft:queue" nil t] 6 (#$ . 4138)])
(nnoo-register-function 'nnagent-request-post)
#@28 

(fn GROUP ACTION SERVER)
(defalias 'nnagent-request-set-mark #[771 "\306\307\261\210\310!\210\311\312\211C\3132|\211
\242\206	\240\210\204)\314\315\316\"\n\"\210\fD\211\203A\211@\314\315\317\"\"\210
A\266\202\202,\210\211\242A@\320\235\203T\321\322\242@\"\202^\321\323\242@\242A@#\211\242B\204x\211\n\235\204x\324
@\n\"\204x\211\nB
\266\2020\266\204\325\261\210\326c\210
&\327ed\330\331!\332\333%\210)\312'@\334=\203\334\335@\3361\315\211;\203\260\337
!@\202\261\211\340
!\204\273\341
!\210\342\343\321\344#!!\262
0\266\202\202\320\266\312\203\334\345\335\"#\210)\312\207" [gnus-command-method gnus-select-method gnus-server-method-cache gnus-server-alist gnus-predefined-server-alist nnheader-file-coding-system "(gnus-agent-synchronize-group-flags \"" "\" '" gnus-pp " \"" nil 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 "") format "%s" "%s:%s" assoc "\"" ")\n" write-region gnus-agent-lib-file "flags" t silent nntp request-set-mark (error) gnus-find-method-for-group featurep require fboundp intern "%s-%s" gnus-get-function coding-system-for-write gnus-agent] 14 (#$ . 4424)])
(nnoo-register-function 'nnagent-request-set-mark)
#@50 

(fn ARTICLES &optional GROUP SERVER FETCH-OLD)
(defalias 'nnagent-retrieve-headers #[1025 "\304\305\"\306\211\211\212\307!\210\310\311\312\"\"\262@@\262
\211\2032\2032@
W\2032A\262\202 	q\210\313 \210\n\314	@\"\210)eb\210m\204\253\3151\233\203\224m\204\224\316p!\262
@V\203d\317 \210\203
@V\203\320\321@@#c\210A\262\202d\203\216
@U\203\216A\262\322y\210\202Mdb0\210\202E\210\323\324\325\326e`\"#\210\322y\210\202E\203\277\320\321@@#c\210A\262\202\253\203\310\247\203\342\327\203\330\322	@Z]\202\333@\330\n!@\"\210)\331\207" [gnus-agent-article-alist nntp-server-buffer nnmail-pathname-coding-system file-name-coding-system gnus-agent-article-name ".overview" nil gnus-agent-load-alist gnus-sorted-difference mapcar car erase-buffer nnheader-insert-nov-file (error) read beginning-of-line format "%d	[Undownloaded article %d]	Gnus Agent			\n" 1 gnus-error 4 "Invalid data on line %d" count-lines nnheader-nov-delete-outside-range last nov] 14 (#$ . 5864)])
(nnoo-register-function 'nnagent-retrieve-headers)
#@46 

(fn ARTICLES GROUP &optional SERVER FORCE)
(defalias 'nnagent-request-expire-articles #[1026 "\207" [] 5 (#$ . 6946)])
(nnoo-register-function 'nnagent-request-expire-articles)
#@47 

(fn GROUP &optional SERVER DONT-CHECK INFO)
(defalias 'nnagent-request-group #[1025 "\300\301\302\303!F#\207" [nnoo-parent-function nnagent nnml-request-group nnagent-server] 11 (#$ . 7132)])
(nnoo-register-function 'nnagent-request-group)
#@31 

(fn GROUP &optional SERVER)
(defalias 'nnagent-close-group #[513 "\300\301\302\303!D#\207" [nnoo-parent-function nnagent nnml-close-group nnagent-server] 8 (#$ . 7388)])
(nnoo-register-function 'nnagent-close-group)
#@36 

(fn GROUP &optional SERVER LAST)
(defalias 'nnagent-request-accept-article #[769 "\300\301\302\303!E#\207" [nnoo-parent-function nnagent nnml-request-accept-article nnagent-server] 9 (#$ . 7614)])
(nnoo-register-function 'nnagent-request-accept-article)
#@41 

(fn ID &optional GROUP SERVER BUFFER)
(defalias 'nnagent-request-article #[1025 "\300\301\302\303!F#\207" [nnoo-parent-function nnagent nnml-request-article nnagent-server] 11 (#$ . 7880)])
(nnoo-register-function 'nnagent-request-article)
#@36 

(fn GROUP &optional SERVER ARGS)
(defalias 'nnagent-request-create-group #[769 "\300\301\302\303!E#\207" [nnoo-parent-function nnagent nnml-request-create-group nnagent-server] 9 (#$ . 8136)])
(nnoo-register-function 'nnagent-request-create-group)
#@37 

(fn GROUP &optional FORCE SERVER)
(defalias 'nnagent-request-delete-group #[769 "\300\301\302\303!E#\207" [nnoo-parent-function nnagent nnml-request-delete-group nnagent-server] 10 (#$ . 8396)])
(nnoo-register-function 'nnagent-request-delete-group)
#@25 

(fn &optional SERVER)
(defalias 'nnagent-request-list #[256 "\300\301\302\303!C#\207" [nnoo-parent-function nnagent nnml-request-list nnagent-server] 6 (#$ . 8658)])
(nnoo-register-function 'nnagent-request-list)
#@25 

(fn &optional SERVER)
(defalias 'nnagent-request-list-newsgroups #[256 "\300\301\302\303!C#\207" [nnoo-parent-function nnagent nnml-request-list-newsgroups nnagent-server] 6 (#$ . 8880)])
(nnoo-register-function 'nnagent-request-list-newsgroups)
#@73 

(fn ARTICLE GROUP SERVER ACCEPT-FORM &optional LAST MOVE-IS-INTERNAL)
(defalias 'nnagent-request-move-article #[1540 "\300\301\302\303	!\257#\207" [nnoo-parent-function nnagent nnml-request-move-article nnagent-server] 15 (#$ . 9135)])
(nnoo-register-function 'nnagent-request-move-article)
#@40 

(fn GROUP NEW-NAME &optional SERVER)
(defalias 'nnagent-request-rename-group #[770 "\300\301\302\303!E#\207" [nnoo-parent-function nnagent nnml-request-rename-group nnagent-server] 10 (#$ . 9446)])
(nnoo-register-function 'nnagent-request-rename-group)
#@31 

(fn &optional GROUP SERVER)
(defalias 'nnagent-request-scan #[512 "\300\301\302\303!D#\207" [nnoo-parent-function nnagent nnml-request-scan nnagent-server] 8 (#$ . 9711)])
(nnoo-register-function 'nnagent-request-scan)
#@50 

(fn ARTICLE NAME VALUE &optional GROUP SERVER)
(defalias 'nnagent-set-status #[1283 "\300\301\302\303!\257#\207" [nnoo-parent-function nnagent nnml-set-status nnagent-server] 14 (#$ . 9940)])
(nnoo-register-function 'nnagent-set-status)
#@25 

(fn &optional SERVER)
(defalias 'nnagent-server-opened #[256 "\300\301\302\303!C#\207" [nnoo-parent-function nnagent nnml-server-opened nnagent-server] 6 (#$ . 10196)])
(nnoo-register-function 'nnagent-server-opened)
#@25 

(fn &optional SERVER)
(defalias 'nnagent-status-message #[256 "\300\301\302\303!C#\207" [nnoo-parent-function nnagent nnml-status-message nnagent-server] 6 (#$ . 10422)])
(nnoo-register-function 'nnagent-status-message)
#@15 

(fn SERVER)
(defalias 'nnagent-request-regenerate #[257 "\300\301\302\303!C#\207" [nnoo-parent-function nnagent nnml-request-regenerate nnagent-server] 6 (#$ . 10651)])
(nnoo-register-function 'nnagent-request-regenerate)
#@21 

(fn SERVER INFOS)
(defalias 'nnagent-retrieve-group-data-early #[514 "\300\207" [nil] 3 (#$ . 10882)])
(byte-code "\300\301!\210\302\303\304\"\210\305\303!\207" [nnoo-register-function nnagent-retrieve-group-data-early nnoo-import-1 nnagent ((nnml)) provide] 3)