changed json serialization of oneliner instances

1 files changed, 10 insertions, 10 deletions

diff --git a/src/main.lisp b/src/main.lisp
index ca44e96..b05d7bc 100644
--- a/src/main.lisp
+++ b/src/main.lisp
@@ -122,16 +122,16 @@
          flagged-by audited-by lockedp)
       instance
     (json:with-object
-      (json:write-key-value "id" db::id)
-      (json:write-key-value "oneliner" oneliner)
-      (json:write-key-value "tags" tags)
-      (json:write-key-value "brief" brief)
-      (json:write-key-value "description" description)
-      (json:write-key-value "createdAt" created-at)
-      (json:write-key-value "editedAt" (if edited-at edited-at :null))
-      (json:write-key-value "createdBy" (contributor-handle created-by))
-      (json:write-key-value "isFlagged" (if (not (null flagged-by)) t :false))
-      (json:write-key-value "isLocked" (if lockedp t :false)))))
+      (json:write-key-value :id db::id)
+      (json:write-key-value :oneliner oneliner)
+      (json:write-key-value :tags tags)
+      (json:write-key-value :brief brief)
+      (json:write-key-value :description description)
+      (json:write-key-value :createdAt created-at)
+      (json:write-key-value :editedAt (if edited-at edited-at :null))
+      (json:write-key-value :createdBy (contributor-handle created-by))
+      (json:write-key-value :isFlagged (if (not (null flagged-by)) t :false))
+      (json:write-key-value :isLocked (if lockedp t :false)))))