Using epg

[Simon Josefsson <jas@extundo.com>]

I'm trying to use epg with Gnus.  First, if we are moving to epg as
the default PGG backend, how about the patch below?

Second, I get failures when signing.  In *Messages* I get:

byte-code: Sign failed: ((key-expired (expiration-time 15540 . 4506)) (key-expired (expiration-time 15540 . 4506)) (key-expired (expiration-time 15540 . 4506)) (key-expired (expiration-time 15540 . 4506)) (key-expired (expiration-time 15540 . 4506)) (key-expired (expiration-time 15540 . 4506)))

I suspect it is because I have some expired keys, and EPG somehow
picked the wrong key to attempt to sign with, but I don't know how to
debug this?

FWIW, GnuPG automatically selects the right key to use, and avoids the
expired ones.

--- mml2015.el	05 Sep 2006 11:53:36 +0200	7.23
+++ mml2015.el	05 Sep 2006 12:46:09 +0200	
@@ -41,6 +41,11 @@
 (defvar mml2015-use (or
 		     (progn
 		       (ignore-errors
+			 (require 'epg))
+		       (and (fboundp 'epg-sign-string)
+			    'epg))
+		     (progn
+		       (ignore-errors
 			;; Avoid the "Recursive load suspected" error
 			;; in Emacs 21.1.
 			(let ((recursive-load-depth-limit 100))
@@ -59,7 +64,7 @@
 				 (fboundp 'mc-cleanup-recipient-headers)
 				 'mailcrypt)))
   "The package used for PGP/MIME.
-Valid packages include `pgg', `gpg' and `mailcrypt'.")
+Valid packages include `epg', `pgg', `gpg' and `mailcrypt'.")
 
 ;; Something is not RFC2015.
 (defvar mml2015-function-alist