fix fields mismatch bug

This commit is contained in:
Travis Shears 2025-06-08 22:13:25 +02:00
parent 38f130fcfd
commit 70aea77dcc

View file

@ -19,7 +19,7 @@
(xt/q client
(eval
(read-string
(format "(quote (-> (from :snippets [* {:xt/id id}]) (order-by {:val pub-date, :dir :desc, :nulls :last}) (offset %s) (limit %s)))" skip limit)))))
(format "(quote (-> (from :snippets [title pub-date tags slug markdown {:xt/id id}]) (order-by {:val pub-date, :dir :desc, :nulls :last}) (offset %s) (limit %s)))" skip limit)))))
(defn put-snippet [id snippet]
(t/log! {:level :info, :data {:snippet snippet :id id}} "Saving new snippet to db")