;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 "\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\313D\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\311D\"\210r\312\313!q\210\314 \210\306!	>\204' \307\315\300D\"\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\300D\"\210\323H\324\325\f!\326=\203\220 \327\f\320\"\330\n\306!	>\204\242 \307\315\300D\"\210\331H\306!	>\204\264 \307\315\300D\"\210\332H$\210\333\334\306!	>\204\312 \307\315\300D\"\210\335H\"\204\333\336\306!	>\204\342 \307\315\300D\"\210\335H\"\203\337c\210\340\333\336\306!	>\204\376 \307\315\300D\"\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 substring url-imap-open-host 2 3 assoc "TYPE" 8 "UID" "Content-type: message/rfc822\n\n" nnimap-request-article] 8])