Gecko [ goons4good.org ]

Name	Size	Permission	Date
.dir-locals.el	105 B	-rw-r--r--	2012-04-13 21:33
auth-source.elc	51.28 KB	-rw-r--r--	2023-06-07 04:09
canlock.elc	5.89 KB	-rw-r--r--	2023-06-07 04:09
compface.elc	1.34 KB	-rw-r--r--	2023-06-07 04:09
deuglify.elc	8.04 KB	-rw-r--r--	2023-06-07 04:09
ecomplete.elc	4.59 KB	-rw-r--r--	2023-06-07 04:09
flow-fill.elc	4.74 KB	-rw-r--r--	2023-06-07 04:09
gmm-utils.elc	7.46 KB	-rw-r--r--	2023-06-07 04:09
gnus-agent.elc	121.05 KB	-rw-r--r--	2023-06-07 04:09
gnus-art.elc	256.06 KB	-rw-r--r--	2023-06-07 04:09
gnus-async.elc	12.05 KB	-rw-r--r--	2023-06-07 04:09
gnus-bcklg.elc	3.42 KB	-rw-r--r--	2023-06-07 04:09
gnus-bookmark.elc	24.2 KB	-rw-r--r--	2023-06-07 04:09
gnus-cache.elc	25.68 KB	-rw-r--r--	2023-06-07 04:09
gnus-cite.elc	27.02 KB	-rw-r--r--	2023-06-07 04:09
gnus-cus.elc	38.53 KB	-rw-r--r--	2023-06-07 04:09
gnus-delay.elc	4.79 KB	-rw-r--r--	2023-06-07 04:09
gnus-demon.elc	7.77 KB	-rw-r--r--	2023-06-07 04:09
gnus-diary.elc	8.86 KB	-rw-r--r--	2023-06-07 04:09
gnus-dired.elc	7.65 KB	-rw-r--r--	2023-06-07 04:09
gnus-draft.elc	11.72 KB	-rw-r--r--	2023-06-07 04:09
gnus-dup.elc	4.45 KB	-rw-r--r--	2023-06-07 04:09
gnus-eform.elc	3.43 KB	-rw-r--r--	2023-06-07 04:09
gnus-ems.elc	5.94 KB	-rw-r--r--	2023-06-07 04:09
gnus-fun.elc	8.5 KB	-rw-r--r--	2023-06-07 04:09
gnus-gravatar.elc	4.09 KB	-rw-r--r--	2023-06-07 04:09
gnus-group.elc	151.52 KB	-rw-r--r--	2023-06-07 04:09
gnus-html.elc	14.29 KB	-rw-r--r--	2023-06-07 04:09
gnus-int.elc	63.73 KB	-rw-r--r--	2023-06-07 04:10
gnus-kill.elc	17.78 KB	-rw-r--r--	2023-06-07 04:10
gnus-logic.elc	5.07 KB	-rw-r--r--	2023-06-07 04:10
gnus-mh.elc	2.83 KB	-rw-r--r--	2023-06-07 04:10
gnus-ml.elc	5.57 KB	-rw-r--r--	2023-06-07 04:10
gnus-mlspl.elc	6.3 KB	-rw-r--r--	2023-06-07 04:10
gnus-msg.elc	85.35 KB	-rw-r--r--	2023-06-07 04:10
gnus-notifications.elc	5.29 KB	-rw-r--r--	2023-06-07 04:10
gnus-picon.elc	8.41 KB	-rw-r--r--	2023-06-07 04:10
gnus-range.elc	12.41 KB	-rw-r--r--	2023-06-07 04:10
gnus-registry.elc	31.31 KB	-rw-r--r--	2023-06-07 04:10
gnus-salt.elc	24.04 KB	-rw-r--r--	2023-06-07 04:10
gnus-score.elc	73.99 KB	-rw-r--r--	2023-06-07 04:10
gnus-setup.elc	4.95 KB	-rw-r--r--	2023-06-07 04:10
gnus-sieve.elc	8.35 KB	-rw-r--r--	2023-06-07 04:10
gnus-spec.elc	14.81 KB	-rw-r--r--	2023-06-07 04:10
gnus-srvr.elc	48.21 KB	-rw-r--r--	2023-06-07 04:10
gnus-start.elc	144.43 KB	-rw-r--r--	2023-06-07 04:10
gnus-sum.elc	414.15 KB	-rw-r--r--	2023-06-07 04:10
gnus-sync.elc	21.49 KB	-rw-r--r--	2023-06-07 04:10
gnus-topic.elc	46.05 KB	-rw-r--r--	2023-06-07 04:10
gnus-undo.elc	4.29 KB	-rw-r--r--	2023-06-07 04:10
gnus-util.elc	52.93 KB	-rw-r--r--	2023-06-07 04:10
gnus-uu.elc	55.72 KB	-rw-r--r--	2023-06-07 04:10
gnus-vm.elc	2.57 KB	-rw-r--r--	2023-06-07 04:10
gnus-win.elc	10.58 KB	-rw-r--r--	2023-06-07 04:10
gnus.elc	156.43 KB	-rw-r--r--	2023-06-07 04:10
gravatar.elc	4.26 KB	-rw-r--r--	2023-06-07 04:10
gssapi.elc	2.41 KB	-rw-r--r--	2023-06-07 04:10
html2text.elc	10.47 KB	-rw-r--r--	2023-06-07 04:10
ietf-drums.elc	7.64 KB	-rw-r--r--	2023-06-07 04:10
legacy-gnus-agent.elc	6.54 KB	-rw-r--r--	2023-06-07 04:10
mail-parse.elc	2.39 KB	-rw-r--r--	2023-06-07 04:10
mail-prsvr.elc	1.23 KB	-rw-r--r--	2023-06-07 04:10
mail-source.elc	28.49 KB	-rw-r--r--	2023-06-07 04:10
mailcap.elc	24.93 KB	-rw-r--r--	2023-06-07 04:10
message.elc	227.03 KB	-rw-r--r--	2023-06-07 04:10
messcompat.elc	2.69 KB	-rw-r--r--	2023-06-07 04:10
mm-archive.elc	2.85 KB	-rw-r--r--	2023-06-07 04:10
mm-bodies.elc	5.99 KB	-rw-r--r--	2023-06-07 04:10
mm-decode.elc	50.6 KB	-rw-r--r--	2023-06-07 04:10
mm-encode.elc	6.2 KB	-rw-r--r--	2023-06-07 04:10
mm-extern.elc	4.28 KB	-rw-r--r--	2023-06-07 04:10
mm-partial.elc	3.37 KB	-rw-r--r--	2023-06-07 04:10
mm-url.elc	8.73 KB	-rw-r--r--	2023-06-07 04:10
mm-util.elc	39.65 KB	-rw-r--r--	2023-06-07 04:10
mm-uu.elc	18.9 KB	-rw-r--r--	2023-06-07 04:10
mm-view.elc	18.51 KB	-rw-r--r--	2023-06-07 04:10
mml-sec.elc	12.41 KB	-rw-r--r--	2023-06-07 04:10
mml-smime.elc	14.44 KB	-rw-r--r--	2023-06-07 04:10
mml.elc	42.01 KB	-rw-r--r--	2023-06-07 04:10
mml1991.elc	11.5 KB	-rw-r--r--	2023-06-07 04:10
mml2015.elc	33.95 KB	-rw-r--r--	2023-06-07 04:10
nnagent.elc	10.93 KB	-rw-r--r--	2023-06-07 04:10
nnbabyl.elc	17.15 KB	-rw-r--r--	2023-06-07 04:10
nndiary.elc	39.54 KB	-rw-r--r--	2023-06-07 04:10
nndir.elc	2.95 KB	-rw-r--r--	2023-06-07 04:11
nndoc.elc	30.11 KB	-rw-r--r--	2023-06-07 04:11
nndraft.elc	10.94 KB	-rw-r--r--	2023-06-07 04:11
nneething.elc	11.83 KB	-rw-r--r--	2023-06-07 04:11
nnfolder.elc	32.19 KB	-rw-r--r--	2023-06-07 04:11
nngateway.elc	3.04 KB	-rw-r--r--	2023-06-07 04:11
nnheader.elc	31.94 KB	-rw-r--r--	2023-06-07 04:11
nnimap.elc	68.59 KB	-rw-r--r--	2023-06-07 04:11
nnir.elc	56.96 KB	-rw-r--r--	2023-06-07 04:11
nnmail.elc	53.02 KB	-rw-r--r--	2023-06-07 04:11
nnmaildir.elc	97.58 KB	-rw-r--r--	2023-06-07 04:11
nnmairix.elc	72.67 KB	-rw-r--r--	2023-06-07 04:11
nnmbox.elc	18.82 KB	-rw-r--r--	2023-06-07 04:11
nnmh.elc	15.52 KB	-rw-r--r--	2023-06-07 04:11
nnml.elc	39.81 KB	-rw-r--r--	2023-06-07 04:11
nnnil.elc	1.77 KB	-rw-r--r--	2023-06-07 04:11
nnoo.elc	8.72 KB	-rw-r--r--	2023-06-07 04:11
nnregistry.elc	1.85 KB	-rw-r--r--	2023-06-07 04:11
nnrss.elc	30.01 KB	-rw-r--r--	2023-06-07 04:11
nnspool.elc	15.88 KB	-rw-r--r--	2023-06-07 04:11
nntp.elc	121.29 KB	-rw-r--r--	2023-06-07 04:11
nnvirtual.elc	18.42 KB	-rw-r--r--	2023-06-07 04:11
nnweb.elc	17.61 KB	-rw-r--r--	2023-06-07 04:11
plstore.elc	14.75 KB	-rw-r--r--	2023-06-07 04:11
pop3.elc	14.53 KB	-rw-r--r--	2023-06-07 04:11
qp.elc	4.35 KB	-rw-r--r--	2023-06-07 04:11
registry.elc	9.3 KB	-rw-r--r--	2023-06-07 04:11
rfc1843.elc	5.35 KB	-rw-r--r--	2023-06-07 04:11
rfc2045.elc	971 B	-rw-r--r--	2023-06-07 04:11
rfc2047.elc	24.75 KB	-rw-r--r--	2023-06-07 04:11
rfc2104.elc	1.43 KB	-rw-r--r--	2023-06-07 04:11
rfc2231.elc	6.84 KB	-rw-r--r--	2023-06-07 04:11
rtree.elc	4.3 KB	-rw-r--r--	2023-06-07 04:11
score-mode.elc	3.32 KB	-rw-r--r--	2023-06-07 04:11
shr-color.elc	9.11 KB	-rw-r--r--	2023-06-07 04:11
shr.elc	33.2 KB	-rw-r--r--	2023-06-07 04:11
sieve-manage.elc	17.1 KB	-rw-r--r--	2023-06-07 04:11
sieve-mode.elc	7.73 KB	-rw-r--r--	2023-06-07 04:11
sieve.elc	11.08 KB	-rw-r--r--	2023-06-07 04:11
smiley.elc	5.39 KB	-rw-r--r--	2023-06-07 04:11
smime.elc	19.61 KB	-rw-r--r--	2023-06-07 04:11
spam-report.elc	11.53 KB	-rw-r--r--	2023-06-07 04:11
spam-stat.elc	19.64 KB	-rw-r--r--	2023-06-07 04:11
spam-wash.elc	1.37 KB	-rw-r--r--	2023-06-07 04:11
spam.elc	83.9 KB	-rw-r--r--	2023-06-07 04:11
starttls.elc	6.42 KB	-rw-r--r--	2023-06-07 04:11
utf7.elc	5.83 KB	-rw-r--r--	2023-06-07 04:11
yenc.elc	3.62 KB	-rw-r--r--	2023-06-07 04:11

Rename

;ELC���
;;; Compiled by mockbuild@buildfarm06.corp.cloudlinux.com on Wed Jun  7 08:10:45 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/gnus/html2text.el
;;; in Emacs version 24.3.1
;;; with all optimizations.

;;; This file contains utf-8 non-ASCII characters,
;;; and so cannot be loaded into Emacs 22 or earlier.
(and (boundp 'emacs-version)
 (< (aref emacs-version (1- (length emacs-version))) ?A)
 (string-lessp emacs-version "23")
 (error "`%s' was compiled for Emacs 23 or later" #$))

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

(defvar html2text-format-single-element-list '(("hr" . html2text-clean-hr)))
#@344 The map of entity to text.

This is an alist were each element is a dotted pair consisting of an
old string, and a replacement string. This replacement is done by the
function `html2text-substitute' which basically performs a
`replace-string' operation for every element in the list. This is
completely verbatim - without any use of REGEXP.
(defvar html2text-replace-list '(("&acute;" . "`") ("&amp;" . "&") ("&apos;" . "'") ("&brvbar;" . "|") ("&cent;" . "c") ("&circ;" . "^") ("&copy;" . "(C)") ("&curren;" . "(#)") ("&deg;" . "degree") ("&divide;" . "/") ("&euro;" . "e") ("&frac12;" . "1/2") ("&gt;" . ">") ("&iquest;" . "?") ("&laquo;" . "<<") ("&ldquo" . "\"") ("&lsaquo;" . "(") ("&lsquo;" . "`") ("&lt;" . "<") ("&mdash;" . "--") ("&nbsp;" . " ") ("&ndash;" . "-") ("&permil;" . "%%") ("&plusmn;" . "+-") ("&pound;" . "£") ("&quot;" . "\"") ("&raquo;" . ">>") ("&rdquo" . "\"") ("&reg;" . "(R)") ("&rsaquo;" . ")") ("&rsquo;" . "'") ("&sect;" . "§") ("&sup1;" . "^1") ("&sup2;" . "^2") ("&sup3;" . "^3") ("&tilde;" . "~")) (#$ . 631))
#@577 A list of removable tags.

This is a list of tags which should be removed, without any
formatting. Note that tags in the list are presented *without*
any "<" or ">". All occurrences of a tag appearing in this
list are removed, irrespective of whether it is a closing or
opening tag, or if the tag has additional attributes. The
deletion is done by the function `html2text-remove-tags'.

For instance the text:

"Here comes something big ."

will be reduced to:

"Here comes something big."

If this list contains the element "font".
(defvar html2text-remove-tag-list '("html" "body" "p" "img" "dir" "head" "div" "br" "font" "title" "meta") (#$ . 1685))
#@472 An alist of tags and processing functions.

This is an alist where each dotted pair consists of a tag, and then
the name of a function to be called when this tag is found.  The
function is called with the arguments p1, p2, p3 and p4. These are
demonstrated below:

" This is bold text "
 ^ ^ ^ ^
 | | | |
p1 p2 p3 p4

Then the called function will typically format the text somewhat and
remove the tags.
(defvar html2text-format-tag-list '(("b" . html2text-clean-bold) ("strong" . html2text-clean-bold) ("u" . html2text-clean-underline) ("i" . html2text-clean-italic) ("em" . html2text-clean-italic) ("blockquote" . html2text-clean-blockquote) ("a" . html2text-clean-anchor) ("ul" . html2text-clean-ul) ("ol" . html2text-clean-ol) ("dl" . html2text-clean-dl) ("center" . html2text-clean-center)) (#$ . 2388))
#@201 Another list of removable tags.

This is a list of tags which are removed similarly to the list
`html2text-remove-tag-list' - but these tags are retained for the
formatting, and then moved afterward.
(defvar html2text-remove-tag-list2 '("li" "dt" "dd" "meta") (#$ . 3271))
#@63 Replace FROM-STRING with TO-STRING in region from MIN to MAX.
(defalias 'html2text-replace-string #[(from-string to-string min max) "b\210\306	!\306\n!Z\307\310\n
\311#\203 �\312	!\210\f\\\202
�*\207" [min to-string from-string change delta max string-width 0 search-forward t replace-match] 4 (#$ . 3550)])
#@35 Get value of ATTRIBUTE from LIST.
(defalias 'html2text-attr-value #[(list attribute) "\302	\"A@\207" [attribute list assoc] 3 (#$ . 3870)])
(defalias 'html2text-get-attr #[(p1 p2) "b\210\306\307	\310#\210\311`S	S\"\312\n!\313\314@A@\3158\316\317\320\"\203P�\312\321\"@\317\321\"T\313O\211D\fB*\202c�\317\322\"\203c�\314\323OD\fBGW\203\344�\317\320\"\203\222�\312\321\"@\317\321\"T\313O\211D\fB*\202\315�\317\324\"\203\250�\316\313OD\fB\202\315�\317\322\"\203\276�\314\323OD\fB\202\315�\321\230\203\315�D\fBTT8\202c�@A@\3158\316\317\321\"\204\314\316O\321\230\204\313D\fBGSW\203Q\317\321\"\204:\314\316O\321\230\204:\323\313O\321\230\204:\313D\fBTT8\202\203o\317\321\"\204o\323\313O\321\230\204o\313D\fB\f.\207" [p1 p2 attr-string tmp-list attr-list counter re-search-forward " +[^ ]" t buffer-substring-no-properties split-string nil 0 2 1 string-match "[^ ]=[^ ]" "=" "[^ ]=\\'" -1 "\\`=[^ ]" prev this next index value attr] 6])
(defalias 'html2text-clean-list-items #[(p1 p2 list-type) "b\210\305\211\306\307\310#\203�	T\202�b\210\n	W\205H�\nT\306\307d\310#\210\f\311\230\2033�\312c\210\202�\f\313\230\203B�\314\315\n\"c\210\202�\316c\210\202�*\207" [p1 items item-nr p2 list-type 0 search-forward "<li>" t "ul" " o " "ol" format " %s: " " x "] 4])
(defalias 'html2text-clean-dtdd #[(p1 p2) "b\210\306\211\307\310\311#\203�\nT\202�b\210	\nW\205\202�	T\312\313d\311#\210\314\315!\2037�``\316\314\315!!Z|\210`\306\312\317d\311#\210\314\315!\203o�\316\314\315!!\316\314\320!!\\`Zb\210``\\|\210`+\202w�`\316\314\320!!Z\321
\f\322\323$\210*\202�*\207" [p1 item-nr items p2 def-p2 def-p1 0 search-forward "<dt>" t re-search-forward "<dt>\$[ ]*\$" match-string 1 string-width "\$[ ]*\$\$</dt>\\|<dd>\$" 2 put-text-property face bold mw1 mw2 mw] 5])
(defalias 'html2text-delete-tags #[(p1 p2 p3 p4) "	|\210\n	ZZ	ZZ|\207" [p1 p2 p3 p4] 4])
(defalias 'html2text-delete-single-tag #[(p1 p2) "	|\207" [p1 p2] 2])
(defalias 'html2text-clean-hr #[(p1 p2) "\303	\"\210b\210\304\305!\210\306\n\307\"c\207" [p1 p2 fill-column html2text-delete-single-tag newline 1 make-string 45] 3])
(defalias 'html2text-clean-ul #[(p1 p2 p3 p4) "\304	\n$\210\305\n	ZZ\306#\207" [p1 p2 p3 p4 html2text-delete-tags html2text-clean-list-items "ul"] 5])
(defalias 'html2text-clean-ol #[(p1 p2 p3 p4) "\304	\n$\210\305\n	ZZ\306#\207" [p1 p2 p3 p4 html2text-delete-tags html2text-clean-list-items "ol"] 5])
(defalias 'html2text-clean-dl #[(p1 p2 p3 p4) "\304	\n$\210\305\n	ZZ\"\207" [p1 p2 p3 p4 html2text-delete-tags html2text-clean-dtdd] 5])
(defalias 'html2text-clean-center #[(p1 p2 p3 p4) "\304	\n$\210\305\n	ZZ\"\207" [p1 p2 p3 p4 html2text-delete-tags center-region] 5])
(defalias 'html2text-clean-bold #[(p1 p2 p3 p4) "\304	\305\306$\210\307\n	$\207" [p2 p3 p1 p4 put-text-property face bold html2text-delete-tags] 5])
(defalias 'html2text-clean-title #[(p1 p2 p3 p4) "\304	\305\306$\210\307\n	$\207" [p2 p3 p1 p4 put-text-property face bold html2text-delete-tags] 5])
(defalias 'html2text-clean-underline #[(p1 p2 p3 p4) "\304	\305\306$\210\307\n	$\207" [p2 p3 p1 p4 put-text-property face underline html2text-delete-tags] 5])
(defalias 'html2text-clean-italic #[(p1 p2 p3 p4) "\304	\305\306$\210\307\n	$\207" [p2 p3 p1 p4 put-text-property face italic html2text-delete-tags] 5])
(defalias 'html2text-clean-font #[(p1 p2 p3 p4) "\304	\n$\207" [p1 p2 p3 p4 html2text-delete-tags] 5])
(defalias 'html2text-clean-blockquote #[(p1 p2 p3 p4) "\304	\n$\207" [p1 p2 p3 p4 html2text-delete-tags] 5])
(defalias 'html2text-clean-anchor #[(p1 p2 p3 p4) "\305	\"\306\n\307\"\f|\210\205,�b\210\310\311\"\203#�\312\313O\202$�c\210\314`\315\316$*\207" [p1 p2 attr-list href p4 html2text-get-attr html2text-attr-value "href" string-match "\\`['\"].*['\"]\\'" 1 -1 put-text-property face bold] 5])
(defalias 'html2text-fix-paragraph #[(p1 p2) "b\210\304\211\305\306\307#\203<�b\210\305\310\307#\203<�\311 \210`b\210\312\310\n\307#\210\313y\210\304\210`\314\315\316\n`$\\\317\n	\"\210*\314\315\316$\207" [p1 refill-stop refill-start p2 nil re-search-forward " $" t ".+[^<][^b][^r][^>]$" beginning-of-line re-search-backward 1 html2text-replace-string " " "" fill-region] 6])
#@149 This _tries_ to fix up the paragraphs - this is done in quite a ad-hook
fashion, quite close to pure guess-work. It does work in some cases though.
(defalias 'html2text-fix-paragraphs #[nil "eb\210\301\302\303\304#\203�\305\224\305\225|\210\202�eb\210m?\2057�`\306\307!\210\310`S\"\210b\210m\2043�\306\307!\210)\202�\207" [p1 re-search-forward "^ $" nil t 0 forward-paragraph 1 html2text-fix-paragraph] 4 (#$ . 8286) nil])
#@107 Removes the tags listed in the list `html2text-remove-tag-list'.
See the documentation for that variable.
(defalias 'html2text-remove-tags #[(tag-list) "\303\211\205*�\n@eb\210\304\305\306	\"d\307#\203\"�\310\224\310\225|\210\202�\nA\211\204�\303*\207" [tag-list tag --dolist-tail-- nil re-search-forward format "\$</?%s[^>]*>\$" t 0] 5 (#$ . 8725) nil])
#@65 See the variable `html2text-format-tag-list' for documentation.
(defalias 'html2text-format-tags #[nil "\306\211\205n�\n@\211@	Aeb\210\307\310\311\f\"d\312#\203e�\306`\306\211\313\314e\312#\210`\315\310\316\f\"d\312#\204H�b\210\310\316\f\"c\210`\313\317e\312#\210`
$\210b\210,\202�*\nA\211\204�\306*\207" [html2text-format-tag-list tag-and-function --dolist-tail-- function tag p4 nil re-search-forward format "\$<%s\\( [^>]*\$?>\\)" t search-backward "<" search-forward "</%s>" "</" p3 p2 p1] 6 (#$ . 9095) nil])
#@62 See the variable `html2text-replace-list' for documentation.
(defalias 'html2text-substitute #[nil "\305\211\205$�\n@eb\210	@	A\306\fed$\210*\nA\211\204�\305*\207" [html2text-replace-list e --dolist-tail-- new-string old-string nil html2text-replace-string] 6 (#$ . 9649) nil])
(defalias 'html2text-format-single-elements #[nil "\306\211\205@�\n@\211@	Aeb\210\307\310\311\f\"d\312#\2037�\306`
\313\314e\312#\210`

\"\210*\202�*\nA\211\204�\306*\207" [html2text-format-single-element-list tag-and-function --dolist-tail-- function tag p2 nil re-search-forward format "\$<%s\\( [^>]*\$?>\\)" t search-backward "<" p1] 5 nil nil])
#@51 Convert HTML to plain text in the current buffer.
(defalias 'html2text #[nil "\212\304\305\306\n!\210\307 \210\306!\210\310 \210\311 \210\312 +\207" [buffer-read-only case-fold-search html2text-remove-tag-list html2text-remove-tag-list2 t nil html2text-remove-tags html2text-format-tags html2text-substitute html2text-format-single-elements html2text-fix-paragraphs] 2 (#$ . 10309) nil])
(provide 'html2text)