enhancement: only run custom queries when not typing

This commit is contained in:
Tienson Qin
2022-02-19 17:16:40 +08:00
parent 6957b17843
commit 8046ccd4d6
3 changed files with 74 additions and 39 deletions

View File

@@ -28,6 +28,7 @@
:system/events (async/chan 100)
:db/batch-txs (async/chan 100)
:file/writes (async/chan 100)
:reactive/custom-queries (async/chan 100)
:notification/show? false
:notification/content nil
:repo/cloning? false
@@ -1145,6 +1146,10 @@
[]
(:file/writes @state))
(defn get-reactive-custom-queries-chan
[]
(:reactive/custom-queries @state))
(defn get-write-chan-length
[]
(let [c (get-file-write-chan)]