Current File : //proc/thread-self/root/kunden/usr/share/emacs/27.2/lisp/url/url-imap.elc

;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; 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\327\f\320\"\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 substring url-imap-open-host 2 3 assoc "TYPE" 8 "UID" "Content-type: message/rfc822\n\n" nnimap-request-article] 8])