pgg and archiving

[Aurélien DEHAY]

Hello.

I've got a strange (well, not so in fact) beahviour with Gnus and
Pgg. I setup pgg for always signing mails I wrote, and Gnus to archive
all my mails in a group.

When I send a mail, Pgg ask 2 times my passphrase: one for signing out
mail, one for signing archive mail, even if I configure Pgg to keep
the passphrase for a couple of minutes.

If someone can give me an answer or, even better, a solution, it would
be nice. Here is the part of .gnus concerning archive and pgg (the
archive folder is on an imap server):


;; -*-*-*-*-*-{   GnuPG  }-*-*-*-*-*-*-

(require 'pgg)

(autoload 'pgg-encrypt-region "pgg"
  "Encrypt the current region." t)
(autoload 'pgg-decrypt-region "pgg"
  "Decrypt the current region." t)
(autoload 'pgg-sign-region "pgg"
  "Sign the current region." t)
(autoload 'pgg-verify-region "pgg"
  "Verify the current region." t)
(autoload 'pgg-insert-key "pgg"
  "Insert the ASCII armored public key." t)
(autoload 'pgg-snarf-keys-region "pgg" "Import public keys in the
  current region." t)

;; Emacs should always decrypt and verify emails
;; automatically
(setq mm-verify-option 'always)
(setq mm-decrypt-option 'always)
(setq gnus-buttonized-mime-types '("multipart/encrypted" "multipart/signed"))

;; Automcatically sign when sending mails
 
(defun will-you-sign ()
  (interactive)
  (if (y-or-n-p "Do you want to sign this message? ")
     (mml-secure-message-sign-pgpmime)))

(add-hook 'gnus-message-setup-hook 'will-you-sign)
(setq pgg-cache-passphrase 't)
(setq pgg-passphrase-cache-expiry 180)

(setq message-send-mail-function 'message-send-mail-with-sendmail)
(setq gnus-message-archive-group "Inbox.Sent")
;; Change imap-mail to your own server
(setq gnus-message-archive-method
      '(nnimap "localhost"))
(setq gnus-gcc-mark-as-read t)





Regards.

-- 
Aurélien DEHAY         http://logicielslibres.info