enhance(dev): humanize option for validation script

also fix nil entity query results
This commit is contained in:
Gabriel Horner
2024-04-15 09:35:05 -04:00
parent 4828cfa17d
commit 8ec360759a
3 changed files with 24 additions and 9 deletions

View File

@@ -28,7 +28,7 @@
[dir db-name] (get-dir-and-db-name graph-dir)
conn (sqlite-db/open-db! dir db-name)
results (if ((set args) "-e")
(map #(let [ent (d/entity @conn (edn/read-string %))]
(map #(when-let [ent (d/entity @conn (edn/read-string %))]
(into {:db/id (:db/id ent)} ent)) (drop 2 args))
;; assumes no :in are in queries
(let [query (into (edn/read-string query*) [:in '$ '%])]