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 : auth-source.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/auth-source.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 "`auth-source.el' was compiled for Emacs 19.29 or later"))

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

(byte-code "\300\301!\210\302\303\304\305\306\307\310\311&\207" [require gnus-util custom-declare-group auth-source nil "Authentication sources." :version "23.1" :group gnus] 8)
#@50 List of authentication protocols and their names
(custom-declare-variable 'auth-source-protocols ''((imap "imap" "imaps" "143" "993") (pop3 "pop3" "pop" "pop3s" "110" "995") (ssh "ssh" "22") (sftp "sftp" "115") (smtp "smtp" "25")) '(#$ . 797) :group 'auth-source :version "23.1" :type '(repeat :tag "Authentication Protocols" (cons :tag "Protocol Entry" (symbol :tag "Protocol") (repeat :tag "Names" (string :tag "Name")))))
(byte-code "\302B\303\304\305	\"!\207" [current-load-list auth-source-protocols auth-source-protocols-customize (lambda (#1=#:defconst-tmp-var) (defconst auth-source-protocols-customize #1#)) mapcar #[(a) "\242\302\303\304	!\226	F)\207" [a p const :tag symbol-name] 4]] 4)
#@28 Cache for auth-source data
(defvar auth-source-cache (make-hash-table :test 'equal) (#$ . 1505))
#@47 Whether auth-source should cache information.
(custom-declare-variable 'auth-source-do-cache 't '(#$ . 1608) :group 'auth-source :version "23.1" :type 'boolean)
#@98 List of authentication sources.

Each entry is the authentication type with optional properties.
(custom-declare-variable 'auth-sources ''((:source "~/.authinfo.gpg" :host t :protocol t)) '(#$ . 1775) :group 'auth-source :version "23.1" :type (byte-code "\301\302\303\304\302\305\306\307\310\311\312\313\302\314\315\316BBBBB\257	F\207" [auth-source-protocols-customize repeat :tag "Authentication Sources" list "Source definition" (const :format #1="" :value :source) (string :tag "Authentication Source") (const :format #1# :value :host) (choice :tag "Host (machine) choice" (const :tag "Any" t) (regexp :tag "Host (machine) regular expression (TODO)") (const :tag "Fallback" nil)) (const :format #1# :value :protocol) choice "Protocol" (const :tag "Any" t) (const :tag "Fallback" nil)] 17))
#@130 Parse `auth-sources' for HOST, and PROTOCOL matches.

Returns fallback choices (where PROTOCOL or HOST are nil) with FALLBACK t.
(defalias 'auth-source-pick #[(host protocol &optional fallback) "\306	\306\211\203^�@\307\n\310\"\307\n\311\"\211\312\232\2045�
;\203*�\313

\"\2045�\203V�
\306\232\203V�\f\312\232\204R�\f9\203G�\f\232\204R�\203V�\f\306\232\203V�\nB*A\211\204\n�*\203g�\202t�?\205t�\314
\312#)\207" [choices auth-sources choice #1=#:--cl-dolist-temp-- p h nil plist-get :host :protocol t string-match auth-source-pick host fallback protocol] 5 (#$ . 2576) "sHost: \nsProtocol: \n"])
(defalias 'auth-source-forget-user-or-password #[(mode host protocol) "\304\305\306	\n$\"\207" [mode host protocol auth-source-cache remhash format "%s %s:%s"] 6 nil "slogin/password: \nsHost: \nsProtocol: \n"])
#@54 Forget all cached auth-source authentication tokens.
(defalias 'auth-source-forget-all-cached #[nil "\301\302\303\"\211\207" [auth-source-cache make-hash-table :test equal] 3 (#$ . 3417) nil])
#@114 Find MODE (string or list of strings) matching HOST and PROTOCOL.
MODE can be "login" or "password" for example.
(defalias 'auth-source-user-or-password #[(mode host protocol) "\306\307\310	\n%\210<\211\203�\202�C\311\312	\n$\313\f
\"\211\203A�\306\307\314\315\235\2035�\316\2027�	\n&\210\202D�\317\320\215,\207" [mode host protocol listy cname auth-source-cache gnus-message 9 "auth-source-user-or-password: get %s for %s (%s)" format "%s %s:%s" gethash "auth-source-user-or-password: cached %s=%s for %s (%s)" "password" "SECRET" --cl-block-nil-- (byte-code "\306	\"\307\211\203]�@\310\f\311\n\312\"C\313\314	\"C\315	!%\211\203Q�\316\317\320\f\321\f\235\2032�\322\2023�
	&\210\203A�
\202C�
\242\203Q�\323
#\210\324\325
\"\210A\211\204�*\307\207" [host protocol choice #1=#:--cl-dolist-temp-- mode found auth-source-pick nil netrc-machine-user-or-password plist-get :source format "%s" auth-source-protocol-defaults gnus-message 9 "auth-source-user-or-password: found %s=%s for %s (%s)" "password" "SECRET" puthash throw --cl-block-nil-- listy auth-source-do-cache cname auth-source-cache] 8) found] 8 (#$ . 3618)])
#@56 Return a list of default ports and names for PROTOCOL.
(defalias 'auth-source-protocol-defaults #[(protocol) "\302	\"\243\207" [protocol auth-source-protocols assoc] 3 (#$ . 4781)])
(defalias 'auth-source-user-or-password-imap #[(mode host) "\302	\303#\207" [mode host auth-source-user-or-password imap] 4])
(defalias 'auth-source-user-or-password-pop3 #[(mode host) "\302	\303#\207" [mode host auth-source-user-or-password pop3] 4])
(defalias 'auth-source-user-or-password-ssh #[(mode host) "\302	\303#\207" [mode host auth-source-user-or-password ssh] 4])
(defalias 'auth-source-user-or-password-sftp #[(mode host) "\302	\303#\207" [mode host auth-source-user-or-password sftp] 4])
(defalias 'auth-source-user-or-password-smtp #[(mode host) "\302	\303#\207" [mode host auth-source-user-or-password smtp] 4])
(provide 'auth-source)

${this.title}

Code Editor : auth-source.elc