@@ -3,6 +3,9 @@
(:require [datascript.core :as d]))
(defn- gen-journal-page-uuid
+ "00000001-2024-0620-0000-000000000000
+first 8 chars as type, currently only '00000001' for journal-day-page.
+the remaining chars for data of this type"
[journal-day]
{:pre [(int? journal-day)]}
(let [journal-day-str (str journal-day)
rcmerci