|
|
|
@ -10,7 +10,8 @@
|
|
|
|
|
#(re-matches #"\d{4}\d{2}\d{2}T\d{2}\d{2}\d{2}\.\d{3}Z" %))
|
|
|
|
|
|
|
|
|
|
(spec/def ::uuid
|
|
|
|
|
#(re-matches #"[0-9a-f]{8}-[0-9a-f]{4}-[0-9a-f]{4}-[0-9a-f]{4}-[0-9a-f]{12}" %))
|
|
|
|
|
#(re-matches
|
|
|
|
|
#"[0-9a-f]{8}-[0-9a-f]{4}-[0-9a-f]{4}-[0-9a-f]{4}-[0-9a-f]{12}" %))
|
|
|
|
|
|
|
|
|
|
(def conn
|
|
|
|
|
(delay (db/connect
|
|
|
|
|