aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLars Ingebrigtsen2020-10-01 05:19:49 +0200
committerLars Ingebrigtsen2020-10-01 05:19:49 +0200
commit648de09e71d0ee28d00204548e98613aac2a2a60 (patch)
treee1d5e769646b8ffdf5bed281a9c52c045b47f560
parent26a882125009d58311de2b2636460cfe2b046c60 (diff)
downloademacs-648de09e71d0ee28d00204548e98613aac2a2a60.tar.gz
emacs-648de09e71d0ee28d00204548e98613aac2a2a60.zip
Remove mml-sec-test that assumes the first signature
This is no longer supported; the user is asked for what signature to use.
-rw-r--r--test/lisp/gnus/mml-sec-tests.el31
1 files changed, 0 insertions, 31 deletions
diff --git a/test/lisp/gnus/mml-sec-tests.el b/test/lisp/gnus/mml-sec-tests.el
index 51083acdaa7..427018520c8 100644
--- a/test/lisp/gnus/mml-sec-tests.el
+++ b/test/lisp/gnus/mml-sec-tests.el
@@ -761,37 +761,6 @@ Use sign-with-sender and encrypt-to-self."
761 method "no-exp@example.org" "sub@example.org" 2 nil)) 761 method "no-exp@example.org" "sub@example.org" 2 nil))
762 ))))) 762 )))))
763 763
764(ert-deftest mml-secure-sign-verify-2 ()
765 "Sign message without sender; then verify and test for expected result."
766 (skip-unless (test-conf))
767 (mml-secure-test-key-fixture
768 (lambda ()
769 (dolist (method (sign-standards) nil)
770 (let ((mml-secure-openpgp-sign-with-sender nil)
771 (mml-secure-smime-sign-with-sender nil))
772 ;; A single signing key for sender sub@example.org is customized
773 ;; in the fixture, but not used here.
774 ;; By default, gpg uses the first secret key in the keyring, which
775 ;; is 02372A42CA6D40FB (OpenPGP) or
776 ;; 0E58229B80EE33959FF718FEEF25402B479DC6E2 (S/MIME) here.
777 (mml-secure-test-en-decrypt
778 method "uid1@example.org" "sub@example.org" 0 nil)
779
780 ;; From sub@example.org, sign with specified key:
781 (let ((mml-secure-openpgp-signers '("02372A42CA6D40FB"))
782 (mml-secure-smime-signers
783 '("D06AA118653CC38E9D0CAF56ED7A2135E1582177")))
784 (mml-secure-test-en-decrypt
785 method "no-exp@example.org" "sub@example.org" 1 nil))
786
787 ;; From sub@example.org, sign with different specified key:
788 (let ((mml-secure-openpgp-signers '("C3999CF1268DBEA2"))
789 (mml-secure-smime-signers
790 '("0E58229B80EE33959FF718FEEF25402B479DC6E2")))
791 (mml-secure-test-en-decrypt
792 method "no-exp@example.org" "sub@example.org" 1 nil))
793 )))))
794
795(ert-deftest mml-secure-sign-verify-3 () 764(ert-deftest mml-secure-sign-verify-3 ()
796 "Try to sign message with expired OpenPGP subkey, which raises an error. 765 "Try to sign message with expired OpenPGP subkey, which raises an error.
797With Ma Gnus v0.14 and earlier a signature would be created with a wrong key." 766With Ma Gnus v0.14 and earlier a signature would be created with a wrong key."