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 : earcon.elc

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

;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`earcon.el' was compiled for Emacs 19.29 or later"))

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

(byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307\310\311%\207" [require gnus gnus-audio gnus-art custom-declare-group earcon nil "Turn ** sounds ** into noise." :group gnus-visual] 6)
#@42 *String denoting the start of an earcon.
(custom-declare-variable 'earcon-prefix '"**" '(#$ . -811) :type 'string :group 'earcon)
#@39 String denoting the end of an earcon.
(custom-declare-variable 'earcon-suffix '"**" '(#$ . 947) :type 'string :group 'earcon)
#@51 *A list of regexps to map earcons to real sounds.
(custom-declare-variable 'earcon-regexp-alist ''(("boring" 1 "Boring.au") ("evil[ 	]+laugh" 1 "Evil_Laugh.au") ("gag\\|puke" 1 "Puke.au") ("snicker" 1 "Snicker.au") ("meow" 1 "catmeow.wav") ("sob\\|boohoo" 1 "cry.wav") ("drum[ 	]*roll" 1 "drumroll.au") ("blast" 1 "explosion.au") ("flush\\|plonk!*" 1 "flush.au") ("kiss" 1 "kiss.wav") ("tee[ 	]*hee" 1 "laugh.au") ("shoot" 1 "shotgun.wav") ("yawn" 1 "snore.wav") ("cackle" 1 "witch.au") ("yell\\|roar" 1 "yell2.au") ("whoop-de-doo" 1 "whistle.au")) '(#$ . -1079) :type '(repeat (list regexp (integer :tag "Match") (string :tag "Sound"))) :group 'earcon)
(byte-code "\301B\302\301!\204�\303\301\304\"\210\305\301!\207" [current-load-list earcon-button-marker-list default-boundp set-default nil make-variable-buffer-local] 3)
#@190 Check text under the mouse pointer for a callback function.
If the text under the mouse pointer has a `earcon-callback' property,
call it with the value of the `earcon-data' text property.
(defalias 'earcon-article-push-button #[(event) "\305\211:\203�A@\202�\306 `\307\310F)\211@)!q\210\211:\203)�A@\202/�\306 `\307\310F)\311	8\206H�	A@:\203E�	A@@\202H�	A@)\312\n\313\"\312\n\314\"\211\205[�\f!+\207" [event position pos data fun window-buffer selected-window (0 . 0) 0 5 get-text-property earcon-data earcon-callback] 6 (#$ . 1914) "e"])
#@160 Check text at point for a callback function.
If the text at point has a `earcon-callback' property,
call it with the value of the `earcon-data' text property.
(defalias 'earcon-article-press-button #[nil "\302`\303\"\302`\304\"\211\205�	!*\207" [data fun get-text-property earcon-data earcon-callback] 4 (#$ . 2475) nil])
#@75 Move point to N buttons backward.
If N is negative, move forward instead.
(defalias 'earcon-article-prev-button #[(n) "\301[!\207" [n earcon-article-next-button] 2 (#$ . 2807) "p"])
#@75 Move point to N buttons forward.
If N is negative, move backward instead.
(defalias 'earcon-article-next-button #[(n) "\306W\203\n�\307\202�\310\311\306W\306W\203�e\202�d\312!	`U\204o�\306V\203o�\313`\314\"\203=�\f`\314\315	$b\210\f`\314\315	$\211\203K�
b\210)\n\203_�\313`\314\"\204_�\f`\314\315	$b\210\313`\316\"\203i�TS\202\"�\317!\204z�\320\321\322\"\210,\207" [n limit backward inhibit-point-motion-hooks function point 0 previous-single-property-change next-single-property-change t abs get-text-property earcon-callback nil intangible zerop gnus-message 5 "No more buttons"] 6 (#$ . 2996) "p"])
#@70 Create a button between FROM and TO with callback FUN and data DATA.
(defalias 'earcon-article-add-button #[(from to fun &optional data) "\306!\203�\203�\307\310	\n\"\311#\210\312	\n\205�\fD\313
D\244
\205*�\314
D\244#\207" [gnus-article-button-face from to gnus-article-mouse-face gnus-mouse-face-prop fun boundp gnus-overlay-put gnus-make-overlay face gnus-add-text-properties gnus-callback gnus-data data] 6 (#$ . 3624)])
(defalias 'earcon-button-entry #[nil "\304\305\203\"�\211A@\306	@!\203�\305\211\202�\305\202�	+\207" [earcon-regexp-alist entry case-fold-search alist t nil looking-at] 4])
(defalias 'earcon-button-push #[(marker) "\212q\210	b\210\306 \307\310\311\n8C\312\f!\203 �\313\f
\"\202<�\314\f!\2035�\312\fJ!\2035�\313\fJ
\"\202<�\315\316\317\f
B#-\207" [gnus-article-buffer marker entry inhibit-point-motion-hooks fun args earcon-button-entry t gnus-audio-play 2 fboundp apply boundp gnus-message 1 "You must define `%S' to use this button"] 5])
#@51 Play Sounds in the region between point and mark.
(defalias 'earcon-region #[(beg end) "\302p	#\207" [beg end earcon-buffer] 4 (#$ . 4622) "r"])
(defalias 'earcon-buffer #[(&optional buffer st nd) "\212\306\300!\203�\203�\211A@\307\211\223\210\202�\307	\203 �	q\210\307\310\211\n\307\211\211eb\210`\211A@\211\205\223�\311!\312\f@\313\311!\260
b\210\314\307\310#\2037�\f\205c�\315\224\f\205k�\315\225\315\224\316\317\320 \307\223B\211@$\210\321\f\211AA)@!\210+\202U�.\207" [earcon-button-marker-list buffer earcon-regexp-alist regexp entry beg boundp nil t regexp-quote ".*\$" "\$.*" re-search-forward 1 earcon-article-add-button earcon-button-push make-marker gnus-audio-play alist case-fold-search inhibit-point-motion-hooks buffer-read-only earcon-prefix earcon-suffix start end from x] 8 nil nil])
#@33 Play sounds in message buffers.
(defalias 'gnus-earcon-display #[nil "\212q\210eb\210\301\302\303\304#\204�db\210\305\306!\210\307p`\")\207" [gnus-article-buffer search-forward "\n\n" nil t sit-for 0 earcon-buffer] 4 (#$ . 5480) nil])
(byte-code "\300\301!\210\302\303!\207" [provide earcon run-hooks earcon-load-hook] 2)

${this.title}

Code Editor : earcon.elc