diff options
| author | Vivien Kraus <vivien@planete-kraus.eu> | 2021-11-12 15:03:21 +0000 |
|---|---|---|
| committer | Vivien Kraus <vivien@planete-kraus.eu> | 2021-11-12 17:47:24 +0000 |
| commit | fdfc737ce34840a768c98aa370725dbe650a6a3c (patch) | |
| tree | 77430f7155e9ace134e9a16c94ddf3fa653b7cf5 /src/scm/webid-oidc/client/reverse-stubs.scm | |
| parent | 2cbef4cfeb856327bb2794963ac99730d190bead (diff) | |
Client: Add a hello world Vala program.
Diffstat (limited to 'src/scm/webid-oidc/client/reverse-stubs.scm')
| -rw-r--r-- | src/scm/webid-oidc/client/reverse-stubs.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/scm/webid-oidc/client/reverse-stubs.scm b/src/scm/webid-oidc/client/reverse-stubs.scm index 5a68525..641ee84 100644 --- a/src/scm/webid-oidc/client/reverse-stubs.scm +++ b/src/scm/webid-oidc/client/reverse-stubs.scm @@ -56,10 +56,10 @@ (define (get-client-id client) (uri->string (client-id client))) -(define (get-key-pair client) +(define (get-client-jwk client) (stubs:scm->json-string (key->jwk (key-pair client)))) -(define (get-redirect-uri client) +(define (get-client-redirect-uri client) (uri->string (redirect-uri client))) (define (make-account-full subject issuer key-pair id-token-header id-token access-token refresh-token) |