Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
ccl.elc	40.24 KB	-rw-r--r--
characters.elc	32.4 KB	-rw-r--r--
charprop.el	5.33 KB	-rw-r--r--
charscript.elc	6.36 KB	-rw-r--r--
cp51932.elc	7.77 KB	-rw-r--r--
eucjp-ms.elc	31 KB	-rw-r--r--
fontset.elc	33.93 KB	-rw-r--r--
isearch-x.elc	2.8 KB	-rw-r--r--
iso-ascii.elc	5.67 KB	-rw-r--r--
iso-cvt.elc	18.49 KB	-rw-r--r--
iso-transl.elc	4.96 KB	-rw-r--r--
ja-dic-cnv.elc	11.51 KB	-rw-r--r--
ja-dic-utl.elc	5.11 KB	-rw-r--r--
kinsoku.elc	3.11 KB	-rw-r--r--
kkc.elc	14.3 KB	-rw-r--r--
latexenc.elc	4.14 KB	-rw-r--r--
latin1-disp.elc	43.78 KB	-rw-r--r--
mule-cmds.elc	90.54 KB	-rw-r--r--
mule-conf.elc	37.85 KB	-rw-r--r--
mule-diag.elc	36.73 KB	-rw-r--r--
mule-util.elc	13.94 KB	-rw-r--r--
mule.elc	78.19 KB	-rw-r--r--
ogonek.elc	16.26 KB	-rw-r--r--
quail.elc	80.29 KB	-rw-r--r--
rfc1843.elc	3.84 KB	-rw-r--r--
robin.elc	8.36 KB	-rw-r--r--
titdic-cnv.elc	34.82 KB	-rw-r--r--
ucs-normalize.elc	209.65 KB	-rw-r--r--
uni-bidi.el	10.79 KB	-rw-r--r--
uni-brackets.el	5.02 KB	-rw-r--r--
uni-category.el	16.28 KB	-rw-r--r--
uni-combining.el	8.56 KB	-rw-r--r--
uni-comment.el	2.67 KB	-rw-r--r--
uni-decimal.el	3.37 KB	-rw-r--r--
uni-decomposition.el	29.4 KB	-rw-r--r--
uni-digit.el	3.6 KB	-rw-r--r--
uni-lowercase.el	8.12 KB	-rw-r--r--
uni-mirrored.el	11.22 KB	-rw-r--r--
uni-name.el	220.76 KB	-rw-r--r--
uni-numeric.el	5.88 KB	-rw-r--r--
uni-old-name.el	19.63 KB	-rw-r--r--
uni-special-lowercase.el	2 KB	-rw-r--r--
uni-special-titlecase.el	6.48 KB	-rw-r--r--
uni-special-uppercase.el	6.68 KB	-rw-r--r--
uni-titlecase.el	8.22 KB	-rw-r--r--
uni-uppercase.el	8.22 KB	-rw-r--r--
utf-7.elc	2.14 KB	-rw-r--r--
utf7.elc	5.69 KB	-rw-r--r--

Code Editor : rfc1843.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.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(defvar rfc1843-word-regexp "~\${\\([!-w][!-~]\\| \$+\\)\$~}\\|$\$")
(defvar rfc1843-word-regexp-strictly "~\${\\([!-w][!-~]\$+\\)\$~}\\|$\$")
(defvar rfc1843-hzp-word-regexp "~\${\\([!-w][!-~]\\| \$+\\|[<>]\$[!-}][!-~]\\| \$+\\)\$~}\\|$\$")
(defvar rfc1843-hzp-word-regexp-strictly "~\${\\([!-w][!-~]\$+\\|[<>]\$[!-}][!-~]\$+\\)\$~}\\|$\$")
(byte-code "\300\301\302\303\304DD\305\306\307\310\311&\210\300\312\302\303\313DD\314\306\307\310\311&\210\300\315\302\303\316DD\317\306\320\310\311&\207" [custom-declare-variable rfc1843-decode-loosely funcall function #[0 "\300\207" [nil] 1] "Loosely check HZ encoding if non-nil.\nWhen it is set non-nil, only buffers or strings with strictly\nHZ-encoded are decoded." :type boolean :group mime rfc1843-decode-hzp #[0 "\300\207" [t] 1] "HZ+ decoding support if non-nil.\nHZ+ specification (also known as HZP) is to provide a standardized\n7-bit representation of mixed Big5, GB, and ASCII text for convenient\ne-mail transmission, news posting, etc." rfc1843-newsgroups-regexp #[0 "\300\207" [#1="chinese\\|hz"] 1 #1#] "Regexp of newsgroups in which might be HZ encoded." string] 8)
#@60 Decode HZ in the region between FROM and TO.

(fn FROM TO)
(defalias 'rfc1843-decode-region #[514 "\306\211\212b\210\204�\307	\203�\n\202�\310#\205\212�\214}\210eb\210\307	\203+�\f\202,�
d\310#\203^�\311\312\224\312\225\"\262\313H\262\314\315\316\312\"\313\224\313\225|\210\"\317=\203W�\320\202X�\321\"c\210\202\"�eb\210\322\323d\310#\205\211�\306f\324=\203{�\325\326!\210\325\312!\210\202a�\306f\327=\203a�\325\312!\210\202a�))\207" [rfc1843-decode-loosely rfc1843-decode-hzp rfc1843-hzp-word-regexp-strictly rfc1843-word-regexp-strictly rfc1843-hzp-word-regexp rfc1843-word-regexp nil re-search-forward t buffer-substring-no-properties 1 0 decode-coding-string rfc1843-decode substring 123 cn-gb-2312 cn-big5 search-forward "~" 10 delete-char -1 126] 9 (#$ . 1559) "r"])
#@55 Decode HZ STRING and return the results.

(fn STRING)
(defalias 'rfc1843-decode-string #[257 "\306\307!r\211q\210\310\311\312\313\314!\315\"\316$\216\203�\317\320!\210c\210ed\321\211\212b\210	\204;�\322\n\2034�\2025�\f\323#\205\254�\214}\210eb\210\322\n\203L�
\202N�#d\323#\203\200�\324\325\224\325\225\"\262\311H\262\326\327\330\325\"\311\224\311\225|\210\"\331=\203y�\332\202z�\333\"c\210\202C�eb\210\334\335d\323#\205\253�\321f\336=\203\235�\337\340!\210\337\325!\210\202\203�\321f\341=\203\203�\337\325!\210\202\203�))\266\342 *\262\207" [enable-multibyte-characters rfc1843-decode-loosely rfc1843-decode-hzp rfc1843-hzp-word-regexp-strictly rfc1843-word-regexp-strictly rfc1843-hzp-word-regexp generate-new-buffer " *temp*" make-byte-code 0 "\301\300!\205	�\302\300!\207" vconcat vector [buffer-name kill-buffer] 2 set-buffer-multibyte to nil re-search-forward t buffer-substring-no-properties 1 decode-coding-string rfc1843-decode substring 123 cn-gb-2312 cn-big5 search-forward "~" 10 delete-char -1 126 buffer-string rfc1843-word-regexp] 12 (#$ . 2353)])
#@59 Decode HZ WORD and return it.

(fn WORD &optional FIRSTC)
(defalias 'rfc1843-decode #[513 "\300\301\302\"\303\203�\304=\2030�T\211\262GW\203\203�H\211\262\305=\204�\306\\I\210\202�T\211\262GW\203\203�H\211\262\305=\2040�\307\310_TH\311#\262\312\245\313=\203b�\314\202c�\315\\I\210\211\312\246\262T\211\262\211\316W\203|�\317\202}�\320\\I\210\2020�\207" [-1 substring 0 nil 123 32 128 + 94 -3135 157 60 201 161 63 64 98] 10 (#$ . 3441)])
(provide 'rfc1843)

${this.title}

Code Editor : rfc1843.elc