diff options
Diffstat (limited to 'lib/zambyte/meta/gauche.scm')
| -rw-r--r-- | lib/zambyte/meta/gauche.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/zambyte/meta/gauche.scm b/lib/zambyte/meta/gauche.scm index f27bc5b..59b82c0 100644 --- a/lib/zambyte/meta/gauche.scm +++ b/lib/zambyte/meta/gauche.scm @@ -58,7 +58,8 @@ (cond ((and (list? json) (json-object-contains-key? json key)) - (set-cdr! (assoc (symbol->string key) json) value)) + (set-cdr! (assoc (symbol->string key) json) value) + json) ((null? json) (error "json-object-set!: cannot set on an empty object" json)) ((list? json) |