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

fix: task rule and filter for db graphs

Browse Source 
Part of LOG-3042
This commit is contained in:
Gabriel Horner
2024-05-06 16:55:45 -04:00
parent 4059062919
commit 4c3fc530b9
2 changed files with 16 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
src/main/frontend/db/query_dsl.cljs
View File

@@ -291,14 +291,17 @@
(build-property-one-arg e)))
(defn- build-task
[e]
[e {:keys [db-graph?]}]
(let [markers (if (coll? (first (rest e)))
(first (rest e))
(rest e))]
(when (seq markers)
(let [markers (set (map (comp string/upper-case name) markers))]
{:query (list 'task '?b markers)
:rules [:task]}))))
(if db-graph?
{:query (list 'task '?b (set markers))
:rules [:task :property]}
(let [markers (set (map (comp string/upper-case name) markers))]
{:query (list 'task '?b markers)
:rules [:task]})))))
(defn- build-priority
[e]
@@ -434,7 +437,7 @@ Some bindings in this fn:
;; task is the new name and todo is the old one
(or (= 'todo fe) (= 'task fe))
(build-task e)
(build-task e env)
(= 'priority fe)
(build-priority e)