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

improve(plugin): filter hooks of db block changes for performance

Browse Source
This commit is contained in:
charlie
2023-01-05 20:45:15 +08:00
committed by Tienson Qin
parent a80a64dfdf
commit 9aa626dcf3
2 changed files with 19 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
src/main/frontend/handler/plugin.cljs
View File

@@ -358,6 +358,20 @@
([pid effect]
(js/LSPluginCore.unregisterTheme (name pid) effect)))
(defn get-installed-hooks
[]
(:plugin/installed-hooks @state/state))
(defn plugin-hook-installed?
[pid hook]
(when-let [hooks (and pid (get-installed-hooks))]
(contains? (get hooks hook) (keyword pid))))
(defn db-block-hook-installed?
[uuid]
(when-let [hook (and uuid (str "hook:db:block_" (string/replace (str uuid) "-" "_")))]
(boolean (seq (get (get-installed-hooks) hook)))))
(def *fenced-code-providers (atom #{}))
(defn register-fenced-code-renderer
@@ -490,8 +504,10 @@
(defn hook-plugin-block-changes
[{:keys [blocks tx-data tx-meta]}]
(let [tx-data' (group-by first tx-data)]
(doseq [b blocks]
(let [tx-data' (group-by first tx-data)
blocks' (filter #(when-let [uuid (:block/uuid %)]
(db-block-hook-installed? uuid)) blocks)]
(doseq [b blocks']
(let [type (str "block:" (:block/uuid b))]
(hook-plugin-db type {:block b :tx-data (get tx-data' (:db/id b)) :tx-meta tx-meta})))))