mirror of
git://git.gnupg.org/gnupg.git
synced 2025-07-03 22:56:33 +02:00
tests: Rename 'error' to 'fail'.
* tests/gpgscm/tests.scm (error): Rename to 'fail'. 'error' is a primitive function (an opcode) of the TinySCHEME vm, and 'error' is also defined by R6RS. Better avoid redefining that. Fix all call sites. * tests/openpgp/4gb-packet.scm: Adapt. * tests/openpgp/decrypt-multifile.scm: Likewise. * tests/openpgp/ecc.scm: Likewise. * tests/openpgp/export.scm: Likewise. * tests/openpgp/gpgtar.scm: Likewise. * tests/openpgp/gpgv-forged-keyring.scm: Likewise. * tests/openpgp/import.scm: Likewise. * tests/openpgp/issue2015.scm: Likewise. * tests/openpgp/issue2346.scm: Likewise. * tests/openpgp/issue2419.scm: Likewise. * tests/openpgp/key-selection.scm: Likewise. * tests/openpgp/mds.scm: Likewise. * tests/openpgp/multisig.scm: Likewise. * tests/openpgp/setup.scm: Likewise. * tests/openpgp/signencrypt.scm: Likewise. * tests/openpgp/ssh-import.scm: Likewise. * tests/openpgp/tofu.scm: Likewise. * tests/openpgp/verify.scm: Likewise. Signed-off-by: Justus Winter <justus@g10code.com>
This commit is contained in:
parent
89ac071eb4
commit
5b5d881f47
19 changed files with 38 additions and 38 deletions
|
@ -76,7 +76,7 @@
|
|||
(display (call-popen `(,@gpg --locate-key ,mailbox) ""))
|
||||
(echo "This is the key we expected:")
|
||||
(display (call-popen `(,@gpg --list-keys ,expected) ""))
|
||||
(error "Expected" expected "but got" fpr)))
|
||||
(fail "Expected" expected "but got" fpr)))
|
||||
(delete-keys set))
|
||||
(lambda (set)
|
||||
(length set))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue