mh-e using smime via gpgsm

[timotheus]

Hi.

Just a note for others who read this list. It took me a very long time
to find a simple solution for integrating real gpgsm support into MH-E,
without writing my own library.

I found that since the GNUs CVS head now supports using easypg for PGP
and SMIME via `gpg' and `gpgsm', so does MH-E with the right
configuration.

EXAMPLE:

;; verify and decrypt
(setq mm-verify-option 'always)
(setq mm-decrypt-option 'always)

;; use EPA/EPG if available
(setq mml-smime-use (cond ((and (locate-library "epa") (locate-library "epg")) 
'epg)
                          (t 'openssl)))

(defun timotheus-change-mh-mml-method-default-pgpmime ()
  (interactive)
  (setq mh-mml-method-default "pgpmime"))

(defun timotheus-change-mh-mml-method-default-smime ()
  (interactive)
  (setq mh-mml-method-default "smime"))

(defadvice mh-letter-mode (after timotheus-mh-letter-mode activate)
  "Add some key strokes."
  (local-set-key (kbd "C-c RET 1") 
'timotheus-change-mh-mml-method-default-pgpmime)
  (local-set-key (kbd "C-c RET 2") 
'timotheus-change-mh-mml-method-default-smime))


Regards,
-timotheus

pgprDjQvXFU5N.pgp
Description: PGP signature