* mml1991.el (mml1991-epg-sign): Don't lookup a private kye by

[gnus] / lisp / mml1991.el

diff --git a/lisp/mml1991.el b/lisp/mml1991.el
index c0113da..6f88f0e 100644 (file)
--- a/lisp/mml1991.el
+++ b/lisp/mml1991.el
@@ -368,11 +368,7 @@ If no one is selected, default secret key is used.  "
       (if mml1991-signers
          (setq signers (mapcar (lambda (name)
                                  (car (epg-list-keys context name t)))
-                               mml1991-signers))
-       (setq signers (list (car (epg-list-keys
-                                 context
-                                 (message-options-get 'mml-sender)
-                                 t))))))
+                               mml1991-signers))))
     (epg-context-set-armor context t)
     (epg-context-set-textmode context t)
     (epg-context-set-signers context signers)
@@ -472,11 +468,7 @@ If no one is selected, default secret key is used.  "
        (if mml1991-signers
            (setq signers (mapcar (lambda (name)
                                    (car (epg-list-keys context name t)))
-                                 mml1991-signers))
-         (setq signers (list (car (epg-list-keys
-                                   context
-                                   (message-options-get 'mml-sender)
-                                   t))))))
+                                 mml1991-signers))))
       (epg-context-set-signers context signers))
     (epg-context-set-armor context t)
     (epg-context-set-textmode context t)