diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/scm/webid-oidc/serializable.scm | 4 |
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)) |