fix: simple task queries and start fixing db dsl-query tests

Tests caught that task query wasn't working. Also disabled
namaspace test and rule for db graphs since they aren't supported
there
This commit is contained in:
Gabriel Horner
2024-06-04 15:53:36 -04:00
parent 33e9df34aa
commit e7f795103d
5 changed files with 109 additions and 27 deletions

View File

@@ -312,8 +312,9 @@
(rest e))]
(when (seq markers)
(if db-graph?
{:query (list 'task '?b (set markers))
:rules [:task]}
(let [markers' (set (map (comp string/capitalize name) markers))]
{:query (list 'task '?b (set markers'))
:rules [:task]})
(let [markers (set (map (comp string/upper-case name) markers))]
{:query (list 'task '?b markers)
:rules [:task]})))))