Current File : //usr/share/emacs/24.3/lisp/url/url-cid.elc

;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:08:18 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/url/url-cid.el
;;; in Emacs version 24.3.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!\207" [require url-vars url-parse mm-decode] 2)
(defalias 'url-cid-gnus #[(cid) "\305\211\211\211\306\f!\211\204\307\310\f\"\202Wr	@q\210\311 )	A@\312\313	8!G\314U\2033\315\nG\314U\203<\316<\203D@\317\320G\"\321\322\323\n\322\211\206U\324\261	,\207" [data part encoding content-type cid nil mm-get-content-id message "Unknown CID encountered: %s" buffer-string symbol-name 2 0 "text/plain" "8bit" format "Content-length: %d
\n" "Content-type: " "
\n" "Content-transfer-encoding: " ""] 10])
(defalias 'url-cid #[(url) "\302\303!\203!r\304\305!q\210\306\307H	>\204\310\311\312\300#\210\313H!)\207\314\315\"\207" [url cl-struct-url-tags fboundp mm-get-content-id generate-new-buffer " *url-cid*" url-cid-gnus 0 error "%s accessing a non-%s" url-filename 6 message "Unable to handle CID URL: %s"] 5])