clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-04-26 07:05:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

chore: allow query script to fetch by entity

Browse Source
This commit is contained in:
Gabriel Horner
2024-04-03 08:59:45 -04:00
parent 7084b53dad
commit a8a2afbf4a
1 changed files with 5 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
deps/db/script/query.cljs vendored
View File

@@ -27,8 +27,11 @@
(let [[graph-dir query*] args
[dir db-name] (get-dir-and-db-name graph-dir)
conn (sqlite-db/open-db! dir db-name)
query (into (edn/read-string query*) [:in '$ '%]) ;; assumes no :in are in queries
results (mapv first (d/q query @conn (rules/extract-rules rules/db-query-dsl-rules)))]
results (if ((set args) "-e")
(map #(into {} (d/entity @conn (edn/read-string %))) (drop 2 args))
;; assumes no :in are in queries
(let [query (into (edn/read-string query*) [:in '$ '%])]
(mapv first (d/q query @conn (rules/extract-rules rules/db-query-dsl-rules)))))]
(when ((set args) "-v") (println "DB contains" (count (d/datoms @conn :eavt)) "datoms"))
(prn results)))