Re: EasyPG for signing and en/decrypting Email

[Richard Riley <rileyrgdev@googlemail.com>]

Giorgos Keramidas <keramida@ceid.upatras.gr> writes:

> On Sun, 05 Apr 2009 13:43:14 +0200, Suno Ano <suno.ano@sunoano.org> wrote:
>> Below is my current setup
>>
>>  1  (require 'epa)
>>  2
>>  3  (setq mml2015-use 'epg)
>>  4  (setq mml2015-encrypt-to-self t)
>>  5  (setq mml2015-verbose t)
>>  6  (setq mml2015-always-trust nil)
>>  7  (setq mml2015-passphrase-cache-expiry '7200)
>>  8
>>  9  (add-hook 'message-setup-hook
>> 10            (lambda ()
>> 11              (if gnus-newsgroup-name
>> 12                  (let ((signers (gnus-group-get-parameter
>> 13                                  gnus-newsgroup-name
>> 14                                  'mml2015-signers
>> 15                                  t)))
>> 16                    (if signers
>> 17                        (set (make-local-variable 'mml2015-signers)
>> 18                             signers))))))
>> 19
>> 20
>> 21  (setq gnus-message-replysign t
>> 22        gnus-message-replyencrypt t
>> 23        gnus-message-replysignencrypted t
>> 24        gnus-treat-x-pgp-sig t
>> 25        mm-verify-option 'always
>> 26        mm-decrypt-option 'always
>> 27  )
>> 28
>> 29  (setq gnus-buttonized-mime-types
>> 30        '("multipart/alternative"
>> 31          "multipart/encrypted"
>> 32          "multipart/signed"))
>> 33
>> 34  (setq mm-coding-system-priorities
>> 35        '(iso-latin-1 iso-latin-9 mule-utf-8))
>
> Thanks for posting this!
>
> Apparently, this requires setting a list of mml2015-signers as a group
> property.  Is there any way to avoid the prompt for selecting a key when
> this property does not exist in the current group, or to use a default
> value?

Look for mml2015-verbose

It might be what you need.