diff options
Diffstat (limited to 'src/scm/webid-oidc/client.scm')
| -rw-r--r-- | src/scm/webid-oidc/client.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/scm/webid-oidc/client.scm b/src/scm/webid-oidc/client.scm index 246731e..7af9a59 100644 --- a/src/scm/webid-oidc/client.scm +++ b/src/scm/webid-oidc/client.scm @@ -83,6 +83,8 @@ (let check-value ((schemes value)) (match schemes (() #t) + (((? symbol?) tl ...) + (check-value tl)) (((hd . args) tl ...) (and (symbol? hd) (let check-args ((args args)) |