Gecko [ 122.154.134.11 ]

Name	Size	Permission
auth-source.elc	5.49 KB	-rw-r--r--
canlock.elc	6.03 KB	-rw-r--r--
compface.elc	1.35 KB	-rw-r--r--
deuglify.elc	8.31 KB	-rw-r--r--
earcon.elc	5.67 KB	-rw-r--r--
ecomplete.elc	4.45 KB	-rw-r--r--
flow-fill.elc	4.57 KB	-rw-r--r--
gmm-utils.elc	7.68 KB	-rw-r--r--
gnus-agent.elc	122.37 KB	-rw-r--r--
gnus-art.elc	258.37 KB	-rw-r--r--
gnus-async.elc	12.09 KB	-rw-r--r--
gnus-audio.elc	2.48 KB	-rw-r--r--
gnus-bcklg.elc	3.67 KB	-rw-r--r--
gnus-bookmark.elc	24.54 KB	-rw-r--r--
gnus-cache.elc	26.11 KB	-rw-r--r--
gnus-cite.elc	27.6 KB	-rw-r--r--
gnus-cus.elc	38.4 KB	-rw-r--r--
gnus-delay.elc	4.98 KB	-rw-r--r--
gnus-demon.elc	8.65 KB	-rw-r--r--
gnus-diary.elc	9 KB	-rw-r--r--
gnus-dired.elc	6.56 KB	-rw-r--r--
gnus-draft.elc	10.7 KB	-rw-r--r--
gnus-dup.elc	4.77 KB	-rw-r--r--
gnus-eform.elc	3.68 KB	-rw-r--r--
gnus-ems.elc	7.21 KB	-rw-r--r--
gnus-fun.elc	8.91 KB	-rw-r--r--
gnus-group.elc	155.85 KB	-rw-r--r--
gnus-int.elc	51.53 KB	-rw-r--r--
gnus-kill.elc	18.37 KB	-rw-r--r--
gnus-logic.elc	5.2 KB	-rw-r--r--
gnus-mh.elc	2.89 KB	-rw-r--r--
gnus-ml.elc	5.22 KB	-rw-r--r--
gnus-mlspl.elc	6.37 KB	-rw-r--r--
gnus-move.elc	3.63 KB	-rw-r--r--
gnus-msg.elc	84.07 KB	-rw-r--r--
gnus-nocem.elc	12.08 KB	-rw-r--r--
gnus-picon.elc	8.63 KB	-rw-r--r--
gnus-range.elc	11.92 KB	-rw-r--r--
gnus-registry.elc	32.46 KB	-rw-r--r--
gnus-salt.elc	29.77 KB	-rw-r--r--
gnus-score.elc	76.25 KB	-rw-r--r--
gnus-setup.elc	5.01 KB	-rw-r--r--
gnus-sieve.elc	8.54 KB	-rw-r--r--
gnus-soup.elc	16.29 KB	-rw-r--r--
gnus-spec.elc	17 KB	-rw-r--r--
gnus-srvr.elc	43.88 KB	-rw-r--r--
gnus-start.elc	142.13 KB	-rw-r--r--
gnus-sum.elc	406.63 KB	-rw-r--r--
gnus-topic.elc	46.81 KB	-rw-r--r--
gnus-undo.elc	4.07 KB	-rw-r--r--
gnus-util.elc	48.22 KB	-rw-r--r--
gnus-uu.elc	57.87 KB	-rw-r--r--
gnus-vm.elc	2.63 KB	-rw-r--r--
gnus-win.elc	12.56 KB	-rw-r--r--
gnus.elc	158.49 KB	-rw-r--r--
html2text.elc	10.59 KB	-rw-r--r--
ietf-drums.elc	7.85 KB	-rw-r--r--
legacy-gnus-agent.elc	6.67 KB	-rw-r--r--
mail-parse.elc	2.44 KB	-rw-r--r--
mail-prsvr.elc	1.29 KB	-rw-r--r--
mail-source.elc	30.28 KB	-rw-r--r--
mailcap.elc	25.11 KB	-rw-r--r--
message.elc	223.29 KB	-rw-r--r--
messcompat.elc	2.83 KB	-rw-r--r--
mm-bodies.elc	6.06 KB	-rw-r--r--
mm-decode.elc	46.1 KB	-rw-r--r--
mm-encode.elc	5.96 KB	-rw-r--r--
mm-extern.elc	4.65 KB	-rw-r--r--
mm-partial.elc	3.44 KB	-rw-r--r--
mm-url.elc	9.94 KB	-rw-r--r--
mm-util.elc	39.83 KB	-rw-r--r--
mm-uu.elc	18.57 KB	-rw-r--r--
mm-view.elc	17.58 KB	-rw-r--r--
mml-sec.elc	12.58 KB	-rw-r--r--
mml-smime.elc	14.58 KB	-rw-r--r--
mml.elc	40.35 KB	-rw-r--r--
mml1991.elc	14.71 KB	-rw-r--r--
mml2015.elc	41.93 KB	-rw-r--r--
nnagent.elc	10.86 KB	-rw-r--r--
nnbabyl.elc	17.45 KB	-rw-r--r--
nndb.elc	29.58 KB	-rw-r--r--
nndiary.elc	39.38 KB	-rw-r--r--
nndir.elc	3.2 KB	-rw-r--r--
nndoc.elc	28.12 KB	-rw-r--r--
nndraft.elc	9.95 KB	-rw-r--r--
nneething.elc	11.98 KB	-rw-r--r--
nnfolder.elc	38.93 KB	-rw-r--r--
nngateway.elc	3.1 KB	-rw-r--r--
nnheader.elc	30.94 KB	-rw-r--r--
nnimap.elc	61.12 KB	-rw-r--r--
nnir.elc	45.26 KB	-rw-r--r--
nnkiboze.elc	11.79 KB	-rw-r--r--
nnlistserv.elc	4.42 KB	-rw-r--r--
nnmail.elc	52.92 KB	-rw-r--r--
nnmaildir.elc	98.94 KB	-rw-r--r--
nnmairix.elc	72.84 KB	-rw-r--r--
nnmbox.elc	19.03 KB	-rw-r--r--
nnmh.elc	15.64 KB	-rw-r--r--
nnml.elc	45.05 KB	-rw-r--r--
nnnil.elc	1.94 KB	-rw-r--r--
nnoo.elc	8.95 KB	-rw-r--r--
nnrss.elc	33.15 KB	-rw-r--r--
nnslashdot.elc	16.43 KB	-rw-r--r--
nnsoup.elc	21.22 KB	-rw-r--r--
nnspool.elc	15.55 KB	-rw-r--r--
nntp.elc	135.97 KB	-rw-r--r--
nnultimate.elc	13.85 KB	-rw-r--r--
nnvirtual.elc	18.99 KB	-rw-r--r--
nnwarchive.elc	21.92 KB	-rw-r--r--
nnweb.elc	18.3 KB	-rw-r--r--
nnwfm.elc	12.56 KB	-rw-r--r--
pop3.elc	13.01 KB	-rw-r--r--
qp.elc	4.12 KB	-rw-r--r--
rfc1843.elc	5.74 KB	-rw-r--r--
rfc2045.elc	1.01 KB	-rw-r--r--
rfc2047.elc	25.24 KB	-rw-r--r--
rfc2104.elc	1.71 KB	-rw-r--r--
rfc2231.elc	6.9 KB	-rw-r--r--
score-mode.elc	3.56 KB	-rw-r--r--
sieve-manage.elc	19.88 KB	-rw-r--r--
sieve-mode.elc	7.1 KB	-rw-r--r--
sieve.elc	10.77 KB	-rw-r--r--
smiley.elc	5.37 KB	-rw-r--r--
smime.elc	18.81 KB	-rw-r--r--
spam-report.elc	11.77 KB	-rw-r--r--
spam-stat.elc	19.88 KB	-rw-r--r--
spam-wash.elc	1.43 KB	-rw-r--r--
spam.elc	87.54 KB	-rw-r--r--
starttls.elc	6.63 KB	-rw-r--r--
utf7.elc	6.08 KB	-rw-r--r--
webmail.elc	28.79 KB	-rw-r--r--
yenc.elc	3.85 KB	-rw-r--r--

Code Editor : deuglify.elc

;ELC���
;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:03:13 2015
;;; from file /builddir/build/BUILD/emacs-23.1/lisp/gnus/deuglify.el
;;; in Emacs version 23.1.1
;;; with all optimizations.

;;; This file contains utf-8 non-ASCII characters
;;; and therefore cannot be loaded into Emacs 21 or earlier.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "23")))
    (error "`deuglify.el' was compiled for Emacs 23 or later"))

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

(byte-code "\300\301!\210\300\302!\207" [require gnus-art gnus-sum] 2)
#@35 Version of gnus-outlook-deuglify.
(defconst gnus-outlook-deuglify-version "1.5 Gnus version" (#$ . 683))
(custom-declare-group 'gnus-outlook-deuglify nil "Deuglify articles generated by broken user agents like MS Outlook (Express)." :version "22.1" :group 'gnus)
#@69 Minimum length of the cited line above the (possibly) wrapped line.
(custom-declare-variable 'gnus-outlook-deuglify-unwrap-min '45 '(#$ . 952) :version "22.1" :type 'integer :group 'gnus-outlook-deuglify)
#@52 Maximum length of the cited line after unwrapping.
(custom-declare-variable 'gnus-outlook-deuglify-unwrap-max '95 '(#$ . 1163) :version "22.1" :type 'integer :group 'gnus-outlook-deuglify)
#@39 Characters that indicate cited lines.
(custom-declare-variable 'gnus-outlook-deuglify-cite-marks '">|#%" '(#$ . 1358) :version "22.1" :type 'string :group 'gnus-outlook-deuglify)
#@112 Characters that inhibit unwrapping if they are the last one on the cited line above the possible wrapped line.
(custom-declare-variable 'gnus-outlook-deuglify-unwrap-stop-chars 'nil '(#$ . 1544) :version "22.1" :type '(radio (const :format "None  " nil) (string :value ".?!")) :group 'gnus-outlook-deuglify)
#@92 Characters that inhibit unwrapping if they are the first one in the possibly wrapped line.
(custom-declare-variable 'gnus-outlook-deuglify-no-wrap-chars '"`" '(#$ . 1858) :version "22.1" :type 'string :group 'gnus-outlook-deuglify)
#@90 Regular expression matching the beginning of an attribution line that should be cut off.
(custom-declare-variable 'gnus-outlook-deuglify-attrib-cut-regexp '"\$On \\|Am \$?\$Mon\\|Tue\\|Wed\\|Thu\\|Fri\\|Sat\\|Sun\$,[^,]+, " '(#$ . 2096) :version "22.1" :type 'string :group 'gnus-outlook-deuglify)
#@67 Regular expression matching the verb used in an attribution line.
(custom-declare-variable 'gnus-outlook-deuglify-attrib-verb-regexp '"wrote\\|writes\\|says\\|schrieb\\|schreibt\\|meinte\\|skrev\\|a écrit\\|schreef\\|escribió" '(#$ . 2404) :version "22.1" :type 'string :group 'gnus-outlook-deuglify)
#@61 Regular expression matching the end of an attribution line.
(custom-declare-variable 'gnus-outlook-deuglify-attrib-end-regexp '": *\\|\\.\\.\\." '(#$ . 2713) :version "22.1" :type 'string :group 'gnus-outlook-deuglify)
#@107 A hook called after an deuglified article has been prepared.
It is run after `gnus-article-prepare-hook'.
(custom-declare-variable 'gnus-outlook-display-hook 'nil '(#$ . 2939) :version "22.1" :type 'hook :group 'gnus-outlook-deuglify)
#@45 Redisplay current buffer or article buffer.
(defalias 'gnus-outlook-display-article-buffer #[nil "r\206�pq\210\301\302!\210\303\304!\210\305\306\307\")\207" [gnus-article-buffer gnus-article-highlight t gnus-treat-article nil gnus-run-hooks gnus-article-prepare-hook gnus-outlook-display-hook] 3 (#$ . 3180)])
#@323 Unwrap lines that appear to be wrapped citation lines.
You can control what lines will be unwrapped by frobbing
`gnus-outlook-deuglify-unwrap-min' and `gnus-outlook-deuglify-unwrap-max',
indicating the minimum and maximum length of an unwrapped citation line.  If
NODISPLAY is non-nil, don't redisplay the article buffer.
(defalias 'gnus-article-outlook-unwrap-lines #[(&optional nodisplay) "\306\307	\nrq\210\307\310 \210\311\312
\313\314
\315\316\317
\f\320\260\f\306\307#\203X�\321\225\322\224Z\323\225\323\224Z\211V\203T�\\W\203T�\324\325!\210\326\224b\210*\202�.?\205b�\327 \207" [gnus-outlook-deuglify-cite-marks gnus-outlook-deuglify-no-wrap-chars gnus-outlook-deuglify-unwrap-stop-chars stop-chars no-wrap cite-marks nil t article-goto-body re-search-forward "^\$[ 	" "]*\$" "\$[" "].*[^\n " "]\$[ 	]?\n" "\\1\$[^\n " "]+.*\$$" 2 1 3 replace-match "\\1\\2 \\3" 0 gnus-outlook-display-article-buffer inhibit-read-only case-fold-search gnus-article-buffer len3 len12 gnus-outlook-deuglify-unwrap-min gnus-outlook-deuglify-unwrap-max nodisplay] 14 (#$ . 3499) "P"])
#@85 Put the text from ATTR-START to the end of buffer at the top of the article buffer.
(defalias 'gnus-outlook-rearrange-article #[(attr-start) "\306rq\210\306\307 \210`\fU?\205W�\310 \210`\311 \203!�`\202\"�d
\fW\203-�d\212\f
}\210\fb\210\312y\210\313\314!\204L�\315`d\316#\210db\210\317 \210d~\210)\320\f\211
$*,\207" [gnus-outlook-deuglify-cite-marks cite-marks inhibit-read-only gnus-article-buffer attr-start to t article-goto-body gnus-kill-all-overlays gnus-article-search-signature nil looking-at ">" message-indent-citation yank-only newline transpose-regions cur] 5 (#$ . 4611)])
#@45 Repair a broken attribution line (Outlook).
(defalias 'gnus-outlook-repair-attribution-outlook #[nil "\306\307r\fq\210\307\310 \210\311\312	\313\314
\315\316	\317\314\320\260\f\306\307#\205.�\321 \210\322\323!\210\324\224-\207" [gnus-outlook-deuglify-cite-marks cite-marks inhibit-read-only case-fold-search gnus-article-buffer gnus-outlook-deuglify-attrib-verb-regexp nil t article-goto-body re-search-forward "^\$[^" "].+\$" "\$" "\$" "\$.*\n?[^\n" "].*\$?" "\\)$" gnus-kill-all-overlays replace-match "\\1\\2\\4" 0 gnus-outlook-deuglify-attrib-end-regexp] 13 (#$ . 5216)])
#@40 Repair a big broken attribution block.
(defalias 'gnus-outlook-repair-attribution-block #[nil "\305\306r\fq\210\306\307 \210\310\311	\312\313\314\260\305\306#\205&�\315 \210\316\317!\210\320\224-\207" [gnus-outlook-deuglify-cite-marks cite-marks inhibit-read-only case-fold-search gnus-article-buffer nil t article-goto-body re-search-forward "^[" " 	]*--* ?[^-]+ [^-]+ ?--*\\s *\n" "[^\n:]+:[ 	]*\$[^\n]+\$\n" "\$[^\n:]+:[ 	]*[^\n]+\n\$+" gnus-kill-all-overlays replace-match "\\1 wrote:\n" 0] 6 (#$ . 5811)])
#@68 Repair a broken attribution line (other user agents than Outlook).
(defalias 'gnus-outlook-repair-attribution-other #[nil "\306\307r\fq\210\307\310 \210\311\312
\313\314	\315	\316\317\320\317\321\260\306\307#\2051�\322 \210\323\324!\210\325\224-\207" [gnus-outlook-deuglify-cite-marks cite-marks inhibit-read-only case-fold-search gnus-article-buffer gnus-outlook-deuglify-attrib-cut-regexp nil t article-goto-body re-search-forward "^\$" "\$?" "\$[^" "].+\$\n\$[^\n" "].*\$?" "\$" "\$.*" "\\)$" gnus-kill-all-overlays replace-match "\\4 \\5\\6\\7" 0 gnus-outlook-deuglify-attrib-verb-regexp gnus-outlook-deuglify-attrib-end-regexp] 15 (#$ . 6338)])
#@96 Repair a broken attribution line.
If NODISPLAY is non-nil, don't redisplay the article buffer.
(defalias 'gnus-article-outlook-repair-attribution #[(&optional nodisplay) "\302 \206\f�\303 \206\f�\304 	\204�\305 \210)\207" [attrib-start nodisplay gnus-outlook-repair-attribution-other gnus-outlook-repair-attribution-block gnus-outlook-repair-attribution-outlook gnus-outlook-display-article-buffer] 1 (#$ . 7012) "P"])
#@87 Repair broken citations.
If NODISPLAY is non-nil, don't redisplay the article buffer.
(defalias 'gnus-article-outlook-rearrange-citation #[(&optional nodisplay) "\302\301!\211\203\f�\303!\210)	?\205�\304 \207" [attrib-start nodisplay gnus-article-outlook-repair-attribution gnus-outlook-rearrange-article gnus-outlook-display-article-buffer] 3 (#$ . 7440) "P"])
#@190 Full deuglify of broken Outlook (Express) articles.
Treat dumbquotes, unwrap lines, repair attribution and rearrange citation.  If
NODISPLAY is non-nil, don't redisplay the article buffer.
(defalias 'gnus-outlook-deuglify-article #[(&optional nodisplay) "\301 \210\302\300!\210\303\300!\210?\205�\304 \207" [nodisplay gnus-article-treat-dumbquotes gnus-article-outlook-unwrap-lines gnus-article-outlook-rearrange-citation gnus-outlook-display-article-buffer] 2 (#$ . 7812) "P"])
#@59 Deuglify broken Outlook (Express) articles and redisplay.
(defalias 'gnus-article-outlook-deuglify-article #[nil "\300\301!\207" [gnus-outlook-deuglify-article nil] 2 (#$ . 8299) nil])
(provide 'deuglify)

${this.title}

Code Editor : deuglify.elc