;;; Code:
-(require 'smime)
+(eval-when-compile (require 'cl))
+
+;; EMIKO doesn't provide the smime.el module.
+(condition-case nil
+ (require 'smime)
+ (error))
(require 'mm-decode)
(autoload 'message-narrow-to-headers "message")
+(autoload 'message-fetch-field "message")
(defun mml-smime-sign (cont)
(when (null smime-keys)