| Server IP : 217.160.0.212 / Your IP : 216.73.216.141 Web Server : Apache System : Linux www 6.18.51-i1-ampere #1196 SMP Fri Sep 11 20:43:55 CEST 2026 aarch64 User : sws1073854427 ( 1073854427) PHP Version : 8.4.23 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /usr/share/emacs/28.2/lisp/mail/ |
Upload File : |
;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.
(byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\210\300\305!\210\306\307\310\"\210\306\311\310\"\210\306\312\313\"\210\306\314\315\"\210\306\316\317\"\210\306\320\321\"\210\306\322\323\"\210\306\324\325\"\210\306\326\327\"\210\306\330\331\"\210\306\332\333\"\210\306\334\335\"\210\306\336\337\"\210\306\340\341\"\210\306\342\343\"\210\306\344\345\"\210\306\346\347\"\210\306\350\351\"\210\306\352\353\"\210\306\354\355\"\210\306\356\357\"\210\306\360\361\"\210\306\362\363\"\210\306\364\365\"\210\306\366\367\"\210\306\370\371\"\207" [require mail-prsvr ietf-drums rfc2231 rfc2047 rfc2045 defalias mail-header-parse-content-type rfc2231-parse-qp-string mail-header-parse-content-disposition mail-content-type-get rfc2231-get-value mail-header-encode-parameter rfc2047-encode-parameter mail-header-remove-comments ietf-drums-remove-comments mail-header-remove-whitespace ietf-drums-remove-whitespace mail-header-strip ietf-drums-strip mail-header-strip-cte ietf-drums-strip-cte mail-header-get-comment ietf-drums-get-comment mail-header-parse-address ietf-drums-parse-address mail-header-parse-addresses ietf-drums-parse-addresses mail-header-parse-date ietf-drums-parse-date mail-narrow-to-head ietf-drums-narrow-to-header mail-quote-string ietf-drums-quote-string mail-header-make-address ietf-drums-make-address mail-header-fold-field rfc2047-fold-field mail-header-unfold-field rfc2047-unfold-field mail-header-narrow-to-field rfc2047-narrow-to-field mail-header-field-value rfc2047-field-value mail-encode-encoded-word-region rfc2047-encode-region mail-encode-encoded-word-buffer rfc2047-encode-message-header mail-encode-encoded-word-string rfc2047-encode-string mail-decode-encoded-word-region rfc2047-decode-region mail-decode-encoded-word-string rfc2047-decode-string mail-decode-encoded-address-region rfc2047-decode-address-region mail-decode-encoded-address-string rfc2047-decode-address-string] 3)
#@121 Parse STRING as a comma-separated list of mail addresses.
The return value is a list with mail/name pairs.
(fn STRING)
(defalias 'mail-header-parse-addresses-lax #[257 "\300\301\302\303\304\305\"\"\"\207" [delq nil mapcar #[257 "\300!\206 \301!\207" [mail-header-parse-address mail-header-parse-address-lax] 3 "\n\n(fn ELEM)"] mail-header-parse-addresses t] 8 (#$ . 2008)])
#@259 Parse STRING as a mail address.
Returns a mail/name pair.
This function will first try to parse STRING as a
standards-compliant address string, and if that fails, try to use
heuristics to determine the email address and the name in the
string.
(fn STRING)
(defalias 'mail-header-parse-address-lax #[257 "\300\301\302\"r\211q\210\303\304\"\216\305!c\210db\210\306\307\310\302#\205X \311\312\310\302#\203+ \313u\210\202. eb\210`\211\314\312\310\302#\206: db{`|\210\315\316\317#\315\320 \321\322#\323\324\"?\205S \211\262B\266\202*\207" [generate-new-buffer " *temp*" t make-closure #[0 "\301\300!\205 \302\300!\207" [V0 buffer-name kill-buffer] 2] string-clean-whitespace search-backward "@" nil re-search-backward " " 1 re-search-forward string-trim "[<]+" "[>]+" buffer-string "[ \n
(]+" "[ \n
)]+" length= 0] 9 (#$ . 2394)])
(provide 'mail-parse)