diff options
| -rw-r--r-- | lib/zambyte/meta/guile-json.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/zambyte/meta/guile-json.scm b/lib/zambyte/meta/guile-json.scm index 195e85e..a5815ff 100644 --- a/lib/zambyte/meta/guile-json.scm +++ b/lib/zambyte/meta/guile-json.scm @@ -52,7 +52,7 @@ ((list? json) (append! json (list (cons (symbol->string key) value)))) ((json-record? json) - (or (and-let* ((pair (assoc (symbol->string key) (json-record->mutators json))) + (or (and-let* ((pair (assoc key (json-record->mutators json))) (mutator (cdr pair))) (mutator json value) json) |