:group 'epg
:type '(choice (const :tag "Default" nil) directory))
-(defcustom epg-locale-coding-system (if (boundp 'locale-coding-system)
- locale-coding-system)
+(defcustom epg-passphrase-coding-system (if (boundp 'locale-coding-system)
+ locale-coding-system)
"Coding system to use with messages from `epg-gpg-program'."
:group 'epg
:type 'symbol)
:group 'epg
:type 'boolean)
-(defconst epg-version-number "0.0.5")
+(defconst epg-version-number "0.0.7")
(defconst epg-gpg-minimum-version "1.4.3")
(cons (cons (downcase (match-string 1 args))
(delete "" (split-string
(substring args
- (match-end 0)))))
+ (match-end 0))
+ ";")))
groups))
(if epg-debug
(message "Invalid group configuration: %S" args))))
config))
(if epg-debug
(message "Invalid %S algorithm configuration: %S"
- type args)))))))
+ type args))))
+ (t
+ (setq config (cons (cons type args) config))))))
(if groups
(cons (cons 'groups groups) config)
config)))