;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:06:17 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/epg-config.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.

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


#@23 Name of this package.
(defconst epg-package-name "epg" (#$ . 553))
#@33 Version number of this package.
(defconst epg-version-number "1.0.0" (#$ . 626))
#@30 Report bugs to this address.
(defconst epg-bug-report-address "ueno@unixuser.org" (#$ . 713))
(byte-code "\300\301\302\303\304\305\306\307\310\311\310\312&\210\313\314\315\316\310\301\317\320&\210\313\321\322\323\310\301\317\320&\210\313\324\302\325\310\301\317\326&\210\313\327\302\330\310\301\317\331&\210\313\332\302\333\310\301\317\334&\207" [custom-declare-group epg nil "Interface to the GNU Privacy Guard (GnuPG)." :tag "EasyPG" :version "23.1" :group data external custom-declare-variable epg-gpg-program (or (executable-find "gpg") (executable-find "gpg2") "gpg") "The `gpg' executable." :type string epg-gpgsm-program "gpgsm" "The `gpgsm' executable." epg-gpg-home-directory "The directory which contains the configuration files of `epg-gpg-program'." (choice (const :tag "Default" nil) directory) epg-passphrase-coding-system "Coding system to use with messages from `epg-gpg-program'." symbol epg-debug "If non-nil, debug output goes to the \" *epg-debug*\" buffer.\nNote that the buffer name starts with a space." boolean] 12)
(defconst epg-gpg-minimum-version "1.4.3")
#@74 Return a list of internal configuration parameters of `epg-gpg-program'.
(defalias 'epg-configuration #[nil "\306\211\211\211\307\310!r\fq\210\311\216\312\313
\306\314\306D\306\315%\205$\316%D\317\"&\210eb\210\320\321\306\314#\203\245\322\323\324!!\323\325!	\326=\203o\327\330\"\203b\323\324\"\227\331\332\333\334\225\306O\335\"\"B\nB\202,&\203,\336\337\"\210\202,	\340>\203\234\327\341\"\203\216	\342\343\331\332\333\335\"\"\"BB\202,&\203,\336\344	#\210\202,	BB\202,+\n\203\262\302\nBB\202\263,\207" [args type groups config #1=#:temp-buffer epg-gpg-program nil generate-new-buffer " *temp*" ((byte-code "\301!\203\n\302!\210\301\207" [#1# buffer-name kill-buffer] 2)) apply call-process t append "--homedir" ("--with-colons" "--list-config") re-search-forward "^cfg:\\([^:]+\\):\\(.*\\)" intern match-string 1 2 group string-match "\\`\\([^:]+\\):" delete "" split-string 0 ";" message "Invalid group configuration: %S" (pubkey cipher digest compress) "\\`\\([0-9]+\\)\\(;[0-9]+\\)*" mapcar string-to-number "Invalid %S algorithm configuration: %S" epg-gpg-home-directory epg-debug] 9 (#$ . 1808)])
(defalias 'epg-config--parse-version #[(string) "\303\304\211\305\306\n	#=\203\307\310\311\n\"!B\303\225\211\202\237*\207" [version index string 0 nil string-match "\\([0-9]+\\)\\.?" string-to-number match-string 1] 6])
(defalias 'epg-config--compare-version #[(v1 v2) "\203	\203@	@U\203A	A\202@\206\302	@\206%\302Z\207" [v1 v2 0] 2])
#@57 Verify that a sufficient version of GnuPG is installed.
(defalias 'epg-check-configuration #[(config &optional minimum-version) "\301\236\305\211\203\nA;\204\306\307\n\"\210\310\nA!\310\206 \f!\311	\"\312Y?\2051\306\313\nA\"*\207" [config version entry minimum-version epg-gpg-minimum-version nil error "Undetermined version: %S" epg-config--parse-version epg-config--compare-version 0 "Unsupported version: %s"] 4 (#$ . 3322)])
#@41 Look at CONFIG and try to expand GROUP.
(defalias 'epg-expand-group #[(config group) "\303\236\211\205\304\n\227	A\"\211\205	A)\207" [config entry group groups assoc] 4 (#$ . 3770)])
(provide 'epg-config)