aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/main.lisp20
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)))))