summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorVivien Kraus <vivien@planete-kraus.eu>2021-11-11 16:54:38 +0000
committerVivien Kraus <vivien@planete-kraus.eu>2021-11-11 16:58:17 +0000
commitd483301708d8b0fcf83ff1fd28e94ab08513f55a (patch)
treea94dfd744c2db9def84acf34a142e297d0879dac
parentf32c316d9f742f4051e676f0baa8cd4223d1bb3b (diff)
serialization: fix variable name.
-rw-r--r--src/scm/webid-oidc/serializable.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/scm/webid-oidc/serializable.scm b/src/scm/webid-oidc/serializable.scm
index b47f7db..78ec6fa 100644
--- a/src/scm/webid-oidc/serializable.scm
+++ b/src/scm/webid-oidc/serializable.scm
@@ -87,7 +87,7 @@
(init-args-reverse #:init-keyword #:init-args-reverse #:accessor init-args-reverse))
(define-class <parser-reading-list> (<parser-reading-value>)
- (items-reverse #:init-keyword #:items-reversed #:accessor items-reversed #:init-value '()))
+ (items-reversed #:init-keyword #:items-reversed #:accessor items-reversed #:init-value '()))
(define-class <parser-reading-extended-attribute> (<parser-state>)
(attribute-name #:init-keyword #:attribute-name #:accessor attribute-name)
@@ -96,7 +96,7 @@
(define-class <parser-root> (<parser-reading-extended-attribute>))
(define-method (get-value (list <parser-reading-list>))
- (reverse (items-reverse list)))
+ (reverse (items-reversed list)))
(define-method (get-value (element <parser-reading-element>))
(let* ((class (init-class element))