(ctree-set-calist-strictly
'pgg-decrypt-condition
'((public-key-algorithm ELG-E DSA ELG)
- (symmetric-key-algorithm 3DES CAST5 BLOWFISH TWOFISH)
+ (symmetric-key-algorithm
+ 3DES CAST5 BLOWFISH RIJNDAEL RIJNDAEL192 RIJNDAEL256 TWOFISH)
(scheme . gpg)))
;;; @ definition of the implementation scheme
(insert-buffer-substring pgg-output-buffer)
(pgg-snarf-keys-region (point-min)(point-max)))))))
+;;;###autoload
+(defun pgg-universal-user-id-argument ()
+ (interactive)
+ (let* ((pgg-overriding-user-id (read-string "User ID: "))
+ (command (key-binding (read-key-sequence
+ (format "Command to execute on \"%s\":"
+ pgg-overriding-user-id)))))
+ (message "")
+ (call-interactively command)))
(provide 'pgg)