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:09:15 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/gnus/canlock.el
;;; in Emacs version 24.3.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.

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

(byte-code "\300\301!\210\302\303\304\305\306\307%\210\310\311\304\312\313\314\306\303&\210\310\315\311\316\313\317\306\303&\210\310\320\304\321\313\322\306\303&\207" [require sha1 custom-declare-group canlock nil "The Cancel-Lock feature." :group news custom-declare-variable canlock-password "Password to use when signing a Cancel-Lock or a Cancel-Key header." :type (radio (const :format "Not specified " nil) (string :tag "Password")) canlock-password-for-verify "Password to use when verifying a Cancel-Lock or a Cancel-Key header." (radio (const :format "Not specified " nil) (string :tag "Password")) canlock-force-insert-header "If non-nil, insert a Cancel-Lock or a Cancel-Key header even if the\nbuffer does not look like a news message." boolean] 8)
#@72 Make a SHA-1 digest of MESSAGE as a unibyte string of length 20 bytes.
(defalias 'canlock-sha1 #[(message) "\302\303	\302\211\304$)\207" [sha1-maximum-internal-length message nil sha1 binary] 5 (#$ . 1315)])
#@27 Make a Cancel-Key header.
(defalias 'canlock-make-cancel-key #[(message-id password) "G\304V\203�\305!\306\307GZ\310\"P\311\312\313#\311\314\313#\315\305	\305\n\316!P!P!!*\207" [password opad ipad message-id 20 canlock-sha1 make-string 64 0 mapconcat #[(byte) "\301\302\303\"!\207" [byte char-to-string logxor 54] 4] "" #[(byte) "\301\302\303\"!\207" [byte char-to-string logxor 92] 4] base64-encode-string string-as-unibyte] 7 (#$ . 1530)])
#@47 Narrow the buffer to the head of the message.
(defalias 'canlock-narrow-to-header #[nil "\302eb\303\304\305\306	!\"\302\307#\203�\310\224\202�db})\207" [case-fold-search mail-header-separator nil re-search-forward format "^$\\|^%s$" regexp-quote t 0] 6 (#$ . 1992)])
#@66 Delete Cancel-Key or Cancel-Lock headers in the narrowed buffer.
(defalias 'canlock-delete-headers #[nil "\301eb\210\302\303\304\301#\205#�\305\224\302\306\304\301#\203�\305\224b\202�d|\210\202�)\207" [case-fold-search t re-search-forward "^Cancel-\$Key\\|Lock\$:" nil 0 "^[^	 ]"] 5 (#$ . 2268)])
#@184 Return a list of the values of Cancel-Lock header.
If KEY is non-nil, look for a Cancel-Key header instead.  The buffer
is expected to be narrowed to just the headers of the message.
(defalias 'canlock-fetch-fields #[(&optional key) "\305\203	�\306\202\n�\307!\310\211\311\211\2058�\312\f\313\"\2036�\314\315\211A@\211\"\203�\f\316\310O\nB\202�\n\237,\207" [key case-fold-search rest fields field mail-fetch-field "Cancel-Key" "Cancel-Lock" nil t split-string "[	\n
 ,]+" string-match "^sha1:" 5] 5 (#$ . 2578)])
#@137 Return a Message-ID in Cancel, Supersedes or Replaces header.
The buffer is expected to be narrowed to just the headers of the
message.
(defalias 'canlock-fetch-id-for-key #[nil "\301\302!\211\205�\303\304\"\205�\305\306\")\206 �\301\307!\206 �\301\310!\207" [cancel mail-fetch-field "Control" string-match "^cancel[	 ]+\$<[^	\n @<>]+@[^	\n @<>]+>\$" match-string 1 "Supersedes" "Replaces"] 4 (#$ . 3111)])
#@62 Insert a Cancel-Key and/or a Cancel-Lock header if possible.
(defalias 'canlock-insert-header #[(&optional id-for-key id-for-lock password) "\306\211\211\211\212\214\307 \210\f\206�\310\311!\211\203E�
\204 �\312 \310\313!\211\2035�\314\315\n\"\2035�\306\202?�\204?�\310\316!\317 \210db\210)\205\267�
\204Y�\204Y�\320\321!\202\267�\204h�\206f�\322\323!;\203v�\324G!\203|�\320\325!\202\267�
\205\205�\326
\"\205\221�\326\"	\204\240�\204\240�\320\327!\202\267�	\203\252�\330	\331\261\210\205\267�\332\333\334!!\331\261-\207" [key-for-lock key-for-key control news canlock-force-insert-header id-for-key nil canlock-narrow-to-header mail-fetch-field "Newsgroups" canlock-fetch-id-for-key "Control" string-match "^cancel[	 ]+<[^	\n @<>]+@[^	\n @<>]+>" "Message-ID" canlock-delete-headers message "There are no Message-ID(s)" read-passwd "Password for Canlock: " zerop "Password for Canlock is bad" canlock-make-cancel-key "Couldn't insert Canlock header" "Cancel-Key: sha1:" "\n" "Cancel-Lock: sha1:" base64-encode-string canlock-sha1 id-for-lock password canlock-password] 4 (#$ . 3531)])
#@124 Verify Cancel-Lock or Cancel-Key in BUFFER.
If BUFFER is nil, the current buffer is assumed.  Signal an error if
it fails.
(defalias 'canlock-verify #[(&optional buffer) "\306\211\211\211\211\211\211\211\211 \212!\203�!q\210\214~\210\307 \210\310\311! \310  \204>�\204>�\312\202P�\313 \314\315!
\204P�\f\204P�\316*\203^�\317\320\"\202\"\206f�\321\322!\211;\203s�\323G!\203y�\317\324!\202 \203\250�
\203\235�\325
\" \203\235�\204\235�\n \211A @\230\202\207�\203\245�\326\202\246�\327 \306\203\332�\f\203\317�\330\331\325\f\"!!\203\317�\204\317�	\211A@\230\203\327�\326\202\330�\327\327 D\235\205\345�\327 \203\372�\203\372�\332\333 #\210\202\203\332\334\"\210\202 \203\332\335 \"\210.	\207" [match key-for-lock key-for-key password id-for-lock id-for-key nil canlock-narrow-to-header canlock-fetch-fields key "There are neither Cancel-Lock nor Cancel-Key headers" canlock-fetch-id-for-key mail-fetch-field "Message-ID" "There are no Message-ID(s)" error "%s" read-passwd "Password for Canlock: " zerop "Password for Canlock is bad" canlock-make-cancel-key "good" "bad" base64-encode-string canlock-sha1 message "Cancel-Key is %s, Cancel-Lock is %s" "Cancel-Lock is %s" "Cancel-Key is %s" errmsg locks keys buffer canlock-password-for-verify] 10 (#$ . 4665) nil])
(provide 'canlock)