From 608701f2c51d53e795700d4a18af0dbf7a5636cc Mon Sep 17 00:00:00 2001
From: Uko Kokņevičs
Date: Sun, 12 Oct 2025 22:33:57 +0300
Subject: Fix enum jsonification

---
 src/enum.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/enum.lisp b/src/enum.lisp
index 9f31b1a..e3ceb6b 100644
--- a/src/enum.lisp
+++ b/src/enum.lisp
@@ -34,8 +34,8 @@
   (defun emit-jzon-write-method (field)
     (let ((writer (gensym "WRITER"))
           (arg (gensym "ARG")))
-      `(defmethod jzon:write-value (,writer (,arg (eql ',(field-name field))))
-         (jzon::write-string ,(field-string field) ,writer))))
+      `(defmethod jzon:write-value ((,writer jzon:writer) (,arg (eql ',(field-name field))))
+         (jzon:write-value ,writer ,(field-string field)))))
 
   (defun emit-parse-value (name fields)
     (let ((type (gensym "TYPE"))
-- 
cgit v1.2.3