summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorVivien Kraus <vivien@planete-kraus.eu>2021-05-18 00:23:29 +0200
committerVivien Kraus <vivien@planete-kraus.eu>2021-05-18 00:49:21 +0200
commit19850f4cbf99019b78df63f9acd6801f4f41ffdc (patch)
treed6a58a968d6a0785f52b6e6379edcb2717c56df4
parent5602216798e9d9108a26f9d495b921a1adc49370 (diff)
fixup! Export a JSON API that is compatible with SRFI-180
-rw-r--r--src/scm/webid-oidc/stubs.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/scm/webid-oidc/stubs.scm b/src/scm/webid-oidc/stubs.scm
index b750e7d..8a7e0c5 100644
--- a/src/scm/webid-oidc/stubs.scm
+++ b/src/scm/webid-oidc/stubs.scm
@@ -107,7 +107,7 @@
(define (fixed:json->scm port)
(with-exception-handler
(lambda (err)
- (raise-not-json str err))
+ (raise-not-json "(input)" err))
(lambda ()
(fix-alists (json->scm port)))))