Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
abbrevlist.elc	1.27 KB	-rw-r--r--
assoc.elc	4.12 KB	-rw-r--r--
bruce.elc	1.48 KB	-rw-r--r--
cc-compat.elc	2.75 KB	-rw-r--r--
cl-compat.elc	3.81 KB	-rw-r--r--
cl.elc	14.81 KB	-rw-r--r--
complete.elc	24.19 KB	-rw-r--r--
crisp.elc	11.09 KB	-rw-r--r--
cust-print.elc	12.32 KB	-rw-r--r--
erc-hecomplete.elc	8.6 KB	-rw-r--r--
eudcb-ph.elc	5.87 KB	-rw-r--r--
fast-lock.elc	16.69 KB	-rw-r--r--
gs.elc	3.76 KB	-rw-r--r--
gulp.elc	4.59 KB	-rw-r--r--
html2text.elc	9.77 KB	-rw-r--r--
info-edit.elc	4.45 KB	-rw-r--r--
iswitchb.elc	31.64 KB	-rw-r--r--
landmark.elc	41.62 KB	-rw-r--r--
lazy-lock.elc	24.11 KB	-rw-r--r--
ledit.elc	4.44 KB	-rw-r--r--
levents.elc	9.27 KB	-rw-r--r--
lmenu.elc	10.96 KB	-rw-r--r--
longlines.elc	15.21 KB	-rw-r--r--
lucid.elc	5.2 KB	-rw-r--r--
mailpost.elc	2.11 KB	-rw-r--r--
mantemp.elc	3.61 KB	-rw-r--r--
meese.elc	833 B	-rw-r--r--
messcompat.el	1.73 KB	-rw-r--r--
mouse-sel.elc	20.17 KB	-rw-r--r--
old-emacs-lock.elc	2.59 KB	-rw-r--r--
old-whitespace.elc	22.78 KB	-rw-r--r--
otodo-mode.elc	23.86 KB	-rw-r--r--
patcomp.elc	988 B	-rw-r--r--
pc-mode.elc	1.3 KB	-rw-r--r--
pc-select.elc	12.86 KB	-rw-r--r--
pgg-def.elc	2.24 KB	-rw-r--r--
pgg-gpg.elc	12.72 KB	-rw-r--r--
pgg-parse.elc	12.87 KB	-rw-r--r--
pgg-pgp.elc	7.42 KB	-rw-r--r--
pgg-pgp5.elc	7.34 KB	-rw-r--r--
pgg.elc	18.98 KB	-rw-r--r--
rcompile.elc	3.01 KB	-rw-r--r--
s-region.elc	3.08 KB	-rw-r--r--
sregex.elc	12.15 KB	-rw-r--r--
starttls.elc	6.03 KB	-rw-r--r--
sup-mouse.elc	3.98 KB	-rw-r--r--
terminal.elc	30.36 KB	-rw-r--r--
tls.elc	7.29 KB	-rw-r--r--
tpu-edt.elc	59.59 KB	-rw-r--r--
tpu-extras.elc	11.88 KB	-rw-r--r--
tpu-mapper.elc	10.33 KB	-rw-r--r--
url-ns.elc	2.16 KB	-rw-r--r--
vc-arch.elc	17.65 KB	-rw-r--r--
vi.elc	47.89 KB	-rw-r--r--
vip.elc	76.49 KB	-rw-r--r--
ws-mode.elc	24.11 KB	-rw-r--r--
yow.elc	2.14 KB	-rw-r--r--

Code Editor : pgg-pgp5.elc

;ELC���
;;; Compiled
;;; in Emacs version 27.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\301%\210\307\310\311\312\306\303\313\314&\210\307\315\316\317\306\303\313\314&\210\307\320\321\322\306\303\313\314&\210\307\323\324\325\306\303\313\314&\210\307\326\327\330\306\303\313\314&\210\307\331\332\333\306\303\313\314&\210\307\334\304\335\306\303\313\336&\207" [require pgg custom-declare-group pgg-pgp5 nil "PGP 5.* interface." :group custom-declare-variable pgg-pgp5-pgpe-program "pgpe" "PGP 5.* `pgpe' executable." :type string pgg-pgp5-pgps-program "pgps" "PGP 5.* `pgps' executable." pgg-pgp5-pgpk-program "pgpk" "PGP 5.* `pgpk' executable." pgg-pgp5-pgpv-program "pgpv" "PGP 5.* `pgpv' executable." pgg-pgp5-shell-file-name "/bin/sh" "File name to load inferior shells from.\nBourne shell or its equivalent (not tcsh) is needed for \"2>\"." pgg-pgp5-shell-command-switch "-c" "Switch used to have the shell execute its command line argument." pgg-pgp5-extra-args "Extra arguments for every PGP 5.* invocation." (choice (const :tag "None" nil) (string :tag "Arguments"))] 8)
#@38 PGP 5.* ID of your default identity.
(defvar pgg-pgp5-user-id nil (#$ . 1449))
(defalias 'pgg-pgp5-process-region #[(start end passphrase program args) "\306\307!\310	\n\311PC#
/001234\312\21156\312\21178r\3132!q\210\314 \210\315 \210)9\203B�\316\317\320\"\210\321\216\322\211:;\323\324\325\3262<	&6*\3276\330\"\2109\203l�\33169\332P\"\210\3336=>#\210\3346!\210\3356!\336=\203\214�\3376\340\"\210\202z�\3356!7\3416!8\3426!\210r2q\210\343 d\312\223?eb\210\344\345?\346#\203\274�\347\350!\210\202\254�)7\351>\203\314�\352\353<8#\2108\354U\203\331�\352\355<\"\210\3134!q\210\314 \210\315 \210\356!.
\207" [errors-file-name args pgg-pgp5-extra-args pgg-pgp5-shell-file-name shell-file-name pgg-pgp5-shell-command-switch pgg-make-temp-file "pgg-errors" append "2>" nil get-buffer-create buffer-disable-undo erase-buffer setenv "PGPPASSFD" "0" #[nil "\203�\302!\303=\203�\304!\210\3051�\306	!0\207\210\307\207" [process errors-file-name process-status run interrupt-process (file-error) delete-file nil] 2] binary apply funcall start-process-shell-command "*PGP*" set-process-sentinel ignore process-send-string "\n" process-send-region process-send-eof process-status run accept-process-output 5 process-exit-status delete-process make-marker re-search-forward "
$" t replace-match "" (stop signal) error "%s exited abnormally: `%s'" 127 "%s could not be found" insert-file-contents shell-command-switch process-environment pgg-output-buffer output-buffer pgg-errors-buffer errors-buffer process-connection-type process status exit-status passphrase coding-system-for-write coding-system-for-read program start end pgg-conversion-end] 8])
#@37 Search keys associated with STRING.
(defalias 'pgg-pgp5-lookup-key #[(string &optional type) "\304\305Er\306\n!q\210\307 \210\310 \210\311\312\313\314\313	&\210eb\210\315\316\313\314#\2054�\317\320\321\322\225\313\210`{!8\320\"*\207" [string args pgg-output-buffer pgg-pgp5-pgpk-program "+language=en" "-l" get-buffer-create buffer-disable-undo erase-buffer apply call-process nil t re-search-forward "^sec" substring 2 split-string 0] 7 (#$ . 3144)])
#@51 Encrypt the current region between START and END.
(defalias 'pgg-pgp5-encrypt-region #[(start end recipients &optional sign passphrase) "\206�	\n\206�\205�\306\307\310\"\"\311\312\313\314\f\204\"�
\2051�\315\311\316\317\311\f
\205.�C\"\"\"BBB\2059�\320\"\321\322%\210rq\210\323 \324U?\205V�\325,\207" [pgg-pgp5-user-id pgg-default-user-id passphrase sign recipients pgg-encrypt-for-me pgg-read-passphrase format "PGP passphrase for %s: " append "+NoBatchInvalidKeys=off" "-fat" "+batchmode=1" apply mapcar #[(rcpt) "\301\302\302QD\207" [rcpt "-r" "\""] 4] ("-s" "-u" pgg-pgp5-user-id) pgg-pgp5-process-region nil buffer-size 0 t args start end pgg-pgp5-pgpe-program pgg-output-buffer] 11 (#$ . 3607)])
#@51 Decrypt the current region between START and END.
(defalias 'pgg-pgp5-decrypt-region #[(start end &optional passphrase) "\206�	\n\206�\306\307\310\"\311\312\"\"\313\314\f
\n%\210rq\210\315 \316U?\205.�\317,\207" [pgg-pgp5-user-id pgg-default-user-id passphrase args start end pgg-read-passphrase format "PGP passphrase for %s: " pgg-pgp5-lookup-key encrypt ("+verbose=1" "+batchmode=1" "+language=us" "-f") pgg-pgp5-process-region buffer-size 0 t pgg-pgp5-pgpv-program pgg-output-buffer] 6 (#$ . 4339)])
#@58 Make detached signature from text between START and END.
(defalias 'pgg-pgp5-sign-region #[(start end &optional clearsign passphrase) "\206�	\n\206�\306\307\310\"\311\312\"\"\203�\313\202�\314\315\316\317\320\257\321
\n\f%\210rq\210\322 \323U?\205b�\324\325\326\327#\203a�\330\331\332\330!\210`d\"\236A !\203`�\333\334 \236A\n\"\210)\327,\207" [pgg-pgp5-user-id pgg-default-user-id passphrase clearsign args start pgg-read-passphrase format "PGP passphrase for %s: " pgg-pgp5-lookup-key sign "-fat" "-fbat" "+verbose=1" "+language=us" "+batchmode=1" "-u" pgg-pgp5-process-region buffer-size 0 re-search-forward "^-+BEGIN PGP SIGNATURE" nil t 2 pgg-parse-armor-region beginning-of-line pgg-add-passphrase-to-cache key-identifier end pgg-pgp5-pgps-program pgg-output-buffer packet pgg-cache-passphrase] 6 (#$ . 4862)])
#@74 Verify region between START and END as the detached signature SIGNATURE.
(defalias 'pgg-pgp5-verify-region #[(start end &optional signature) "\306\307!\310\311 \312\216\313\314!\210\315\316\211\317	#\210-;\2036�\320	\321P\211\"\210\322C\"\323``\316%\210\324	!\210\203M�\324!\210rq\210eb\210\325\326\316\327#\205g�q\210\330!\210\327+\207" [args orig-file #1=#:umask jam-zcat-filename-list jka-compr-compression-info-list coding-system-for-write pgg-make-temp-file "pgg" ("+verbose=1" "+batchmode=1" "+language=us") default-file-modes #[nil "\301!\207" [#1# set-default-file-modes] 2] set-default-file-modes 448 binary nil write-region copy-file ".asc" append pgg-pgp5-process-region delete-file re-search-forward "^Good signature" t insert-buffer-substring start end signature pgg-pgp5-pgpv-program pgg-errors-buffer pgg-output-buffer] 6 (#$ . 5707)])
#@29 Insert public key at point.
(defalias 'pgg-pgp5-insert-key #[nil "\206�	\305\306\307\310\311\311Q\257\312``\313\n%\210\314\f!*\207" [pgg-pgp5-user-id pgg-default-user-id args pgg-pgp5-pgpk-program pgg-output-buffer "+verbose=1" "+batchmode=1" "+language=us" "-x" "\"" pgg-pgp5-process-region nil insert-buffer-substring] 7 (#$ . 6598)])
#@69 Add all public keys in region between START and END to the keyring.
(defalias 'pgg-pgp5-snarf-keys-region #[(start end) "\206�	\306\307!\310\311\312\313\n\257\314\315
\n#\210)\316
\317%\210\320\n!\210rq\210\321 \322U?\2058�\323,\207" [pgg-pgp5-user-id pgg-default-user-id key-file args coding-system-for-write start pgg-make-temp-file "pgg" "+verbose=1" "+batchmode=1" "+language=us" "-a" raw-text-dos write-region pgg-pgp5-process-region nil delete-file buffer-size 0 t end pgg-pgp5-pgpk-program pgg-output-buffer] 6 (#$ . 6948)])
(provide 'pgg-pgp5)

${this.title}

Code Editor : pgg-pgp5.elc