;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 nnmh nnml nnoo nndir mapcar list (nnml nnmh) nil "*internal-non-initialized-backend*"] 4)
#@107 Where nndir will look for groups.

This is a Gnus server variable.  See Info node `(gnus)Select Methods'.
(defvar nndir-directory nil (#$ . 416))
(nnoo-define 'nndir-directory '(nnml-current-directory nnmh-current-directory))
#@131 Non-nil means that nndir will never retrieve NOV headers.

This is a Gnus server variable.  See Info node `(gnus)Select Methods'.
(defvar nndir-nov-is-evil nil (#$ . 649))
(nnoo-define 'nndir-nov-is-evil '(nnml-nov-is-evil))
(defvar nndir-current-group "")
(nnoo-define 'nndir-current-group '(nnml-current-group nnmh-current-group))
(defvar nndir-top-directory nil)
(nnoo-define 'nndir-top-directory '(nnml-directory nnmh-directory))
(defvar nndir-get-new-mail nil)
(nnoo-define 'nndir-get-new-mail '(nnml-get-new-mail nnmh-get-new-mail))
(defvar nndir-status-string "")
(nnoo-define 'nndir-status-string '(nnmh-status-string))
(defconst nndir-version "nndir 1.0")
(byte-code "\300\301\302\"\210\303\301!\210\300\304\305\"\210\303\304!\210\300\306\307\"\210\303\306!\210\300\310\311\"\210\303\310!\207" [defalias nndir-server-opened #[256 "\300\301\"\207" [nnoo-server-opened nndir] 4 "\n\n(fn &optional SERVER)"] nnoo-register-function nndir-status-message #[256 "\300\301\"\207" [nnoo-status-message nndir] 4 "\n\n(fn &optional SERVER)"] nndir-close-server #[512 "\300\301\"\207" [nnoo-close-server nndir] 5 "\n\n(fn &optional SERVER DEFS)"] nndir-open-server #[513 "\300\301#\207" [nnoo-change-server nndir] 6 "\n\n(fn SERVER &optional DEFS)"]] 3)
#@30 

(fn SERVER &optional DEFS)
(defalias 'nndir-open-server #[513 "\300
\236A@\206	
\300
\236\204\300D
B\262
\301\302\303!!D
B\262
\304\305\303!!D
B\262
\306\307#\210\310\3111?\312!0\202H\313\314\"\211\262\262
\204W\315 \210\316\307\206U\317\"\207\320\321!!\204h\315 \210\316\307\322#\207\316\307\323$\210\324\207" [nndir-directory nndir-current-group file-name-nondirectory directory-file-name nndir-top-directory file-name-directory nnoo-change-server nndir nil (ftp-error) file-exists-p format "%s" nndir-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] 8 (#$ . 1911)])
(nnoo-register-function 'nndir-open-server)
#@19 

(fn &rest ARGS)
(defalias 'nndir-retrieve-headers #[128 "\301\302\303@\3048\3058F#\207" [nndir-current-group nnoo-parent-function nndir nnml-retrieve-headers 2 3] 9 (#$ . 2660)])
(nnoo-register-function 'nndir-retrieve-headers)
#@19 

(fn &rest ARGS)
(defalias 'nndir-request-article #[128 "\301\302\303@\3048\3058F#\207" [nndir-current-group nnoo-parent-function nndir nnml-request-article 2 3] 9 (#$ . 2902)])
(nnoo-register-function 'nndir-request-article)
#@19 

(fn &rest ARGS)
(defalias 'nndir-request-group #[128 "\301\302\303A@\3048E#\207" [nndir-current-group nnoo-parent-function nndir nnmh-request-group 2] 8 (#$ . 3141)])
(nnoo-register-function 'nndir-request-group)
#@19 

(fn &rest ARGS)
(defalias 'nndir-close-group #[128 "\301\302\303A@D#\207" [nndir-current-group nnoo-parent-function nndir nnml-close-group] 6 (#$ . 3366)])
(nnoo-register-function 'nndir-close-group)
#@19 

(fn &rest ARGS)
(defalias 'nndir-request-list #[128 "\300\301\302\303\301!C#\207" [nnoo-parent-function nndir nnml-request-list nnoo-current-server] 6 (#$ . 3576)])
(byte-code "\300\301!\210\302\303!\207" [nnoo-register-function nndir-request-list provide nndir] 2)