Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
.dir-locals.el	105 B	-rw-r--r--
canlock.elc	5.71 KB	-rw-r--r--
deuglify.elc	7.85 KB	-rw-r--r--
gmm-utils.elc	5.79 KB	-rw-r--r--
gnus-agent.elc	119.17 KB	-rw-r--r--
gnus-art.elc	262.11 KB	-rw-r--r--
gnus-async.elc	11.71 KB	-rw-r--r--
gnus-bcklg.elc	2.85 KB	-rw-r--r--
gnus-bookmark.elc	25.33 KB	-rw-r--r--
gnus-cache.elc	24.08 KB	-rw-r--r--
gnus-cite.elc	26.28 KB	-rw-r--r--
gnus-cloud.elc	18.45 KB	-rw-r--r--
gnus-cus.elc	39.5 KB	-rw-r--r--
gnus-delay.elc	4.61 KB	-rw-r--r--
gnus-demon.elc	7.52 KB	-rw-r--r--
gnus-diary.elc	8.41 KB	-rw-r--r--
gnus-dired.elc	8.03 KB	-rw-r--r--
gnus-draft.elc	12.03 KB	-rw-r--r--
gnus-dup.elc	4.59 KB	-rw-r--r--
gnus-eform.elc	4.76 KB	-rw-r--r--
gnus-fun.elc	9.93 KB	-rw-r--r--
gnus-gravatar.elc	4.15 KB	-rw-r--r--
gnus-group.elc	154.92 KB	-rw-r--r--
gnus-html.elc	13.41 KB	-rw-r--r--
gnus-icalendar.elc	40.93 KB	-rw-r--r--
gnus-int.elc	58.83 KB	-rw-r--r--
gnus-kill.elc	19.24 KB	-rw-r--r--
gnus-logic.elc	5.15 KB	-rw-r--r--
gnus-mh.elc	2.96 KB	-rw-r--r--
gnus-ml.elc	6.08 KB	-rw-r--r--
gnus-mlspl.elc	6.48 KB	-rw-r--r--
gnus-msg.elc	84.49 KB	-rw-r--r--
gnus-notifications.elc	5.38 KB	-rw-r--r--
gnus-picon.elc	8.06 KB	-rw-r--r--
gnus-range.elc	11.97 KB	-rw-r--r--
gnus-registry.elc	34.53 KB	-rw-r--r--
gnus-rfc1843.elc	1.59 KB	-rw-r--r--
gnus-salt.elc	27.54 KB	-rw-r--r--
gnus-score.elc	74.27 KB	-rw-r--r--
gnus-sieve.elc	8.14 KB	-rw-r--r--
gnus-spec.elc	12.88 KB	-rw-r--r--
gnus-srvr.elc	50.09 KB	-rw-r--r--
gnus-start.elc	138.21 KB	-rw-r--r--
gnus-sum.elc	431.26 KB	-rw-r--r--
gnus-topic.elc	46.53 KB	-rw-r--r--
gnus-undo.elc	4.69 KB	-rw-r--r--
gnus-util.elc	49.29 KB	-rw-r--r--
gnus-uu.elc	55.9 KB	-rw-r--r--
gnus-vm.elc	2.42 KB	-rw-r--r--
gnus-win.elc	10.95 KB	-rw-r--r--
gnus.elc	158.84 KB	-rw-r--r--
gssapi.elc	2.27 KB	-rw-r--r--
legacy-gnus-agent.elc	6.35 KB	-rw-r--r--
mail-source.elc	28.21 KB	-rw-r--r--
message.elc	237.92 KB	-rw-r--r--
mm-archive.elc	2.95 KB	-rw-r--r--
mm-bodies.elc	5.84 KB	-rw-r--r--
mm-decode.elc	55.66 KB	-rw-r--r--
mm-encode.elc	6.13 KB	-rw-r--r--
mm-extern.elc	4.25 KB	-rw-r--r--
mm-partial.elc	3.05 KB	-rw-r--r--
mm-url.elc	9.75 KB	-rw-r--r--
mm-util.elc	24.33 KB	-rw-r--r--
mm-uu.elc	21.99 KB	-rw-r--r--
mm-view.elc	16.82 KB	-rw-r--r--
mml-sec.elc	35.2 KB	-rw-r--r--
mml-smime.elc	10.44 KB	-rw-r--r--
mml.elc	44.72 KB	-rw-r--r--
mml1991.elc	7.59 KB	-rw-r--r--
mml2015.elc	25.61 KB	-rw-r--r--
nnagent.elc	10.44 KB	-rw-r--r--
nnbabyl.elc	16.84 KB	-rw-r--r--
nndiary.elc	38.56 KB	-rw-r--r--
nndir.elc	2.67 KB	-rw-r--r--
nndoc.elc	30.1 KB	-rw-r--r--
nndraft.elc	10.55 KB	-rw-r--r--
nneething.elc	11.45 KB	-rw-r--r--
nnfolder.elc	32.39 KB	-rw-r--r--
nngateway.elc	2.88 KB	-rw-r--r--
nnheader.elc	34.72 KB	-rw-r--r--
nnimap.elc	73.06 KB	-rw-r--r--
nnir.elc	62.86 KB	-rw-r--r--
nnmail.elc	52.09 KB	-rw-r--r--
nnmaildir.elc	90.83 KB	-rw-r--r--
nnmairix.elc	72.33 KB	-rw-r--r--
nnmbox.elc	18.57 KB	-rw-r--r--
nnmh.elc	15.14 KB	-rw-r--r--
nnml.elc	33.63 KB	-rw-r--r--
nnnil.elc	1.63 KB	-rw-r--r--
nnoo.elc	8.63 KB	-rw-r--r--
nnregistry.elc	1.72 KB	-rw-r--r--
nnrss.elc	29.02 KB	-rw-r--r--
nnspool.elc	15.72 KB	-rw-r--r--
nntp.elc	111.69 KB	-rw-r--r--
nnvirtual.elc	18.31 KB	-rw-r--r--
nnweb.elc	16.67 KB	-rw-r--r--
score-mode.elc	4.93 KB	-rw-r--r--
smiley.elc	5.31 KB	-rw-r--r--
smime.elc	18.76 KB	-rw-r--r--
spam-report.elc	11.41 KB	-rw-r--r--
spam-stat.elc	19.39 KB	-rw-r--r--
spam-wash.elc	1.23 KB	-rw-r--r--
spam.elc	80.84 KB	-rw-r--r--

Code Editor : mm-bodies.elc

;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!\207" [require mm-util rfc2047 mm-encode] 2)
(defvar mm-7bit-chars " -\n	\f")
(byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [custom-declare-variable mm-body-charset-encoding-alist '((iso-2022-jp . 7bit) (iso-2022-jp-2 . 7bit) (utf-16 . base64) (utf-16be . base64) (utf-16le . base64)) "Alist of MIME charsets to encodings.\nValid encodings are `7bit', `8bit', `quoted-printable' and `base64'." :type (repeat (cons (symbol :tag "charset") (choice :tag "encoding" (const 7bit) (const 8bit) (const quoted-printable) (const base64)))) :group mime autoload message-options-get "message"] 8)
#@375 Encode whole buffer's contents.
Buffer's multibyteness will be turned off when encoding takes place.
If there is more than one non-ASCII MULE charset in the body, then the
list of MULE charsets found is returned.
If CHARSET is non-nil, it is used as the MIME charset to encode the body.
If successful, the MIME charset is returned.
If no encoding was done, nil is returned.
(defalias 'mm-encode-body #[(&optional charset) "\204&�	\206q�\212eb\210\305\306\307\310#\205$�\n\206$�\311\312!\206$�\313\312\314\315!\")\207\212	\203?�\316\317 \320	!\"\321 \210\322\307!\210c\210	\202p�eb\210\323ed#\211\204P�\307\202o�\fG\324V\203[�\f\202o�\f@\211\316\317 \320	!\"\321 \210\322\307!\210c\210))\207" [enable-multibyte-characters charset mail-parse-charset mm-hack-charsets charsets re-search-forward "[^�-]" nil t message-options-get mm-body-charset-encoding-alist message-options-set read-coding-system "Charset used in the article: " encode-coding-string buffer-string mm-charset-to-coding-system erase-buffer set-buffer-multibyte mm-find-mime-charset-region 1] 6 (#$ . 1071)])
#@67 Say whether any of the lines in the buffer is longer than LENGTH.
(defalias 'mm-long-lines-p #[(length) "\212eb\210\301\210m\204�iV\204�\302y\210\301\210\202�iV\205!�i)\207" [length nil 1] 2 (#$ . 2154)])
#@77 Do Content-Transfer-Encoding and return the encoding of the current buffer.
(defalias 'mm-body-encoding #[(charset &optional encoding) ";\203\n�\306\227!\307 \310\311!\312\313!\210	\204;�\2031�\212\314\315\316\317#)\204;�\212\314\320\316\317#)\204;�\n\321=\203;�\n\202\202�\204e�	\204e�\f
\236A\204e�A\317=\204a�\fA>\204a�\f=\203e�\n\202\202�\206r�\f
\236A\206r�\322 \203{�\323!\324\325\"\210)*\207" [encoding longp bits mm-use-ultra-safe-encoding charset mm-body-charset-encoding-alist intern mm-body-7-or-8 mm-long-lines-p 1000 require message re-search-forward " $" nil t "^From " 7bit mm-qp-or-base64 mm-safer-encoding mm-encode-content-transfer-encoding "text/plain" message-posting-charset mail-parse-charset] 4 (#$ . 2372)])
#@39 Say whether the body is 7bit or 8bit.
(defalias 'mm-body-7-or-8 #[nil "\212eb\210\301w\210m)\203�\302\207\303\207" [mm-7bit-chars nil 7bit 8bit] 2 (#$ . 3130)])
#@121 Decodes buffer encoded with ENCODING, returning success status.
If TYPE is `text/plain' CRLF->LF translation may occur.
(defalias 'mm-decode-content-transfer-encoding #[(encoding &optional type) "\3061~�\307\267\202g�\310ed\"\210\311\202z�\312e\212eb\210\313\314\315\311#\203*�\316\224\316\225|\210\202�db\210\317\320\315\311#\2038�\315y\210`)\"\202z�\311\202z�\321\322!\210	ed\"\210\311\202z�\321\322!\210\ned\"\210\311\202z�\321\322!\210ed\"\202z�\323!\203v�ed\"\210\311\202z�\324\325\"0\202\206�\324\326\f\"\210)\315
\203\253�\327>\203\253�\330\331
\"\203\253�eb\210\332\333\315\311#\203\253�\334\335\311\211#\210\202\232�\207" [encoding mm-uu-decode-function mm-uu-binhex-decode-function mm-uu-yenc-decode-function error type (error) #s(hash-table size 10 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (quoted-printable 10 base64 19 nil 62 7bit 62 8bit 62 binary 62 x-uuencode 66 x-uue 66 x-binhex 79 x-yenc 92)) quoted-printable-decode-region t base64-decode-region re-search-forward "^[	 ]*
?\n" nil 0 re-search-backward "^[	 ]*[A-Za-z0-9+/]+=*[	 ]*$" require mm-uu functionp message "Unknown encoding %s; defaulting to 8bit" "Error while decoding: %s" (base64 x-uuencode x-uue x-binhex x-yenc) string-match "\\`text/" search-forward "
\n" replace-match "\n"] 6 (#$ . 3300)])
#@253 Decode the current article that has been encoded with ENCODING to CHARSET.
ENCODING is a MIME content transfer encoding.
CHARSET is the MIME charset with which to decode the data after transfer
decoding.  If it is nil, default to `mail-parse-charset'.
(defalias 'mm-decode-body #[(charset &optional encoding type) ";\203\n�\306\227!\203 �	\307=\204 �\307	>\204 �	>\203\"�\n\212\203,�\310\f\"\210\311=?\205q�\312\313\314#\211\204L�	<\203L�\315	>\203L�\312\n!\203k�
\203k�\203k�
\316=\203e�\n\211\203k�\317ed
#\210\211))\207" [charset mail-parse-ignored-charsets mail-parse-charset encoding type coding-system intern gnus-all mm-decode-content-transfer-encoding gnus-decoded mm-charset-to-coding-system nil t gnus-unknown ascii decode-coding-region enable-multibyte-characters last-coding-system-used buffer-file-coding-system] 5 (#$ . 4615)])
#@29 Decode STRING with CHARSET.
(defalias 'mm-decode-string #[(string charset) ";\203\n�\306\227!\203 �	\307=\204 �\307	>\204 �	>\203\"�\n\310\311\312#\211\204;�	<\203;�\313	>\203;�\310\n!\205W�\205W�\f\205W�\314=\203S�\n\211\205W�\315
\")\206\\�
\207" [charset mail-parse-ignored-charsets mail-parse-charset coding-system enable-multibyte-characters string intern gnus-all mm-charset-to-coding-system nil t gnus-unknown ascii decode-coding-string] 5 (#$ . 5483)])
(provide 'mm-bodies)

${this.title}

Code Editor : mm-bodies.elc