summaryrefslogtreecommitdiff
path: root/tests/verification-failed.scm
diff options
context:
space:
mode:
authorVivien Kraus <vivien@planete-kraus.eu>2021-08-09 18:46:48 +0200
committerVivien Kraus <vivien@planete-kraus.eu>2021-08-13 01:06:38 +0200
commitded10e28782f289ad3db15320bcf619ab4336876 (patch)
tree32609fd9f1eb0d2f8a23105e09f193827d16a275 /tests/verification-failed.scm
parent7b62790238902e10edb83c07286cf0643b097997 (diff)
Switch to a more sensible error reporting system
Diffstat (limited to 'tests/verification-failed.scm')
-rw-r--r--tests/verification-failed.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/verification-failed.scm b/tests/verification-failed.scm
index f4c22de..5bb5dd0 100644
--- a/tests/verification-failed.scm
+++ b/tests/verification-failed.scm
@@ -1,4 +1,4 @@
-;; webid-oidc, implementation of the Solid specification
+;; disfluid, implementation of the Solid specification
;; Copyright (C) 2020, 2021 Vivien Kraus
;; This program is free software: you can redistribute it and/or modify
@@ -31,7 +31,7 @@
(signature "lNhmpAX_WwmpBvwhok4E74kWCiGBNdavjLAeevGy32H3dbF0Jbri69Nm2ukkwb-uyUI4AUg_JSskfWIyo4UCbQ")) ;; Replaced 1 with _
(with-exception-handler
(lambda (error)
- (unless ((record-predicate &invalid-signature) error)
+ (unless (invalid-signature? error)
(exit 1)))
(lambda ()
(verify 'ES256 key payload signature)