diff options
author | Vivien Kraus <vivien@planete-kraus.eu> | 2021-09-21 19:49:24 +0200 |
---|---|---|
committer | Vivien Kraus <vivien@planete-kraus.eu> | 2021-09-21 22:34:45 +0200 |
commit | 0d74f8c1ca9c1e9bf9a04b85f598ba7a175d1d86 (patch) | |
tree | bcac166559940b2785e5925aedd2ce39e751d9fa /src/scm/webid-oidc/parameters.scm | |
parent | 3be4b418a4ec1e94d28401810ff8629ddc86adf9 (diff) |
OIDC configuration: use GOOPS and document it
Diffstat (limited to 'src/scm/webid-oidc/parameters.scm')
-rw-r--r-- | src/scm/webid-oidc/parameters.scm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/scm/webid-oidc/parameters.scm b/src/scm/webid-oidc/parameters.scm index 603a2cd..7d10798 100644 --- a/src/scm/webid-oidc/parameters.scm +++ b/src/scm/webid-oidc/parameters.scm @@ -16,8 +16,8 @@ (define-module (webid-oidc parameters) #:use-module (srfi srfi-19) - #:use-module (webid-oidc jti) - #:export (data-home cache-home current-date) + #:use-module (web client) + #:export (data-home cache-home current-date anonymous-http-request) #:declarative? #t) (define data-home @@ -49,3 +49,6 @@ (when (time? date) (set! date (time-utc->date date))) date))))) + +(define anonymous-http-request + (make-parameter http-request)) |