;ELC
;;; Compiled
;;; in Emacs version 26.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 "\300\301!\210\300\302!\210\300\303!\210\300\304!\207" [require url-util url-parse nnimap mm-util] 2)
#@20 Default IMAP port.
(defconst url-imap-default-port 143 (#$ . 521))
(defalias 'url-imap-open-host #[(host port user pass) "\306\307!\203 \307 \210 \203 \310\202 \311 \312
\313D\314\315\nDE\"+\207" [user pass authenticator imap-password imap-username host fboundp nnheader-init-server-buffer login anonymous nnimap-open-server nnimap-server-port (nnimap-stream 'network) nnimap-authenticator port] 6])
(defalias 'url-imap #[(url) "\306! >\204 \307\310\311D\"\210r\312\313!q\210\314 \210\306! >\204' \307\315\300D\"\210\316H\306! >\204; \307\315\300D\"\210\211\317H\206k \306! >\204P \307\315\300D\"\210\211\320H\205k \321\306! >\204f \307\315\300D\"\210\320H\322\"\262\306! >\204} \307\315\300D\"\210\323H \324 \325\f!\326=\203\220 \f\320\327O\330\n \306! >\204\242 \307\315\300D\"\210\331H\306! >\204\264 \307\315\300D\"\210\332H$\210\333\334\306! >\204\312 \307\315\300D\"\210\335H\"\204\333\336\306! >\204\342 \307\315\300D\"\210\335H\"\203\337c\210\340\333\336\306! >\204\376 \307\315\300D\"\210\335H\"A\f\np$\210,p)\207" [url cl-struct-url-tags host port mailbox coding-system-for-read type-of signal wrong-type-error "Need a pre-parsed URL." generate-new-buffer " *url-imap*" mm-disable-multibyte wrong-type-argument 4 5 1 url-scheme-get-property default-port 6 binary string-to-char 47 nil url-imap-open-host 2 3 assoc "TYPE" 8 "UID" "Content-type: message/rfc822\n\n" nnimap-request-article] 8])
|