Fix property rules for advanced queries with db graphs

and provide a rules var just for db graphs.
Also simplify query-dsl db-graph support as query-dsl/parse-query
doesn't need to know about db graphs for how it's used
This commit is contained in:
Gabriel Horner
2023-07-25 13:49:25 -04:00
parent 01ff0e9a16
commit e9fecfa280
9 changed files with 79 additions and 73 deletions

View File

@@ -29,7 +29,7 @@
(let [[graph-name query*] args
conn (read-graph graph-name)
query (into (edn/read-string query*) [:in '$ '%]) ;; assumes no :in are in queries
results (mapv first (apply d/q query @conn [(vals rules/query-dsl-rules)]))]
results (mapv first (apply d/q query @conn [(vals rules/db-query-dsl-rules)]))]
(println "DB contains" (count (d/datoms @conn :eavt)) "datoms")
(prn results)))