| Server IP : 217.160.0.212 / Your IP : 216.73.216.63 Web Server : Apache System : Linux www 6.18.52-i1-ampere #1203 SMP Mon Sep 14 18:29:59 CEST 2026 aarch64 User : sws1073854427 ( 1073854427) PHP Version : 8.4.23 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /usr/share/emacs/28.2/lisp/obsolete/ |
Upload File : |
;ELC ;;; Compiled ;;; in Emacs version 28.2 ;;; with all optimizations. (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\313\314DD\315\316\317%\210\310\320\312\313\321DD\322\316\323%\210\310\324\312\313\325DD\326\316\323%\210\310\327\312\313\330DD\331\306\307\316\332&\210\310\333\312\313\334DD\335\316\332%\210\310\336\312\313\337DD\340\316\332%\210\310\341\312\313\342DD\343\316\344%\210\310\345\312\313\346DD\347\316\350%\207" [custom-declare-group pgg nil "Glue for the various PGP implementations." :group mime :version "22.1" custom-declare-variable pgg-default-scheme funcall function #[0 "\300\207" [gpg] 1 #1=""] "Default PGP scheme." :type (choice (const :tag "GnuPG" gpg) (const :tag "PGP 5" pgp5) (const :tag "PGP" pgp)) pgg-default-user-id #[0 "\300 \207" [user-login-name] 1 #1#] "User ID of your default identity." string pgg-default-keyserver-address #[0 "\300\207" ["subkeys.pgp.net"] 1 #1#] "Host name of keyserver." pgg-query-keyserver #[0 "\300\207" [nil] 1 #1#] "Whether PGG queries keyservers for missing keys when verifying messages." boolean pgg-encrypt-for-me #[0 "\300\207" [t] 1 #1#] "If t, encrypt all outgoing messages with user's public key." pgg-cache-passphrase #[0 "\300\207" [t] 1 #1#] "If t, cache passphrase." pgg-passphrase-cache-expiry #[0 "\300\207" [16] 1 #1#] "How many seconds the passphrase is cached.\nWhether the passphrase is cached at all is controlled by\n`pgg-cache-passphrase'." integer pgg-passphrase-coding-system #[0 "\300\207" [nil] 1 #1#] "Coding system to encode passphrase." coding-system] 8) #@62 Coding system used when reading from a PGP external process. (defvar pgg-messages-coding-system nil (#$ . 1577)) (defvar pgg-status-buffer " *PGG status*") (defvar pgg-errors-buffer " *PGG errors*") (defvar pgg-output-buffer " *PGG output*") (defvar pgg-echo-buffer "*PGG-echo*") #@39 Current scheme of PGP implementation. (defvar pgg-scheme nil (#$ . 1863)) #@52 If t, inform the recipient that the input is text. (defvar pgg-text-mode nil (#$ . 1943)) #@12 (fn KEY) (defalias 'pgg-truncate-key-identifier '(macro . #[257 "\300\301\302D\303BB\304\305BBF\207" [if > length (8) substring (-8)] 6 (#$ . 2039)])) (provide 'pgg-def)