clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-04-28 08:04:40 +00:00
Code Issues Packages Projects Releases Wiki Activity

improve: reuse function about filter installed plugins

Browse Source
This commit is contained in:
charlie
2022-11-15 16:48:27 +08:00
committed by Tienson Qin
parent 8e10239b87
commit 135717e08e
2 changed files with 9 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
src/main/frontend/state.cljs
View File

@@ -1764,22 +1764,20 @@ Similar to re-frame subscriptions"
(when-let [id (and id (keyword id))]
(get-in @state [:plugin/installed-plugins id])))
(defn get-all-enabled?-installed-plugins
([enabled? include-unpacked?]
(filterv
#(and (if include-unpacked? true (:iir %))
(if-not (boolean? enabled?) true (= (not enabled?) (boolean (get-in % [:settings :disabled])))))
(vals (:plugin/installed-plugins @state)))))
(defn get-enabled?-installed-plugins
([theme?] (get-enabled?-installed-plugins theme? true false))
([theme? enabled? include-unpacked?]
([theme?] (get-enabled?-installed-plugins theme? true false false))
([theme? enabled? include-unpacked? include-all?]
(filterv
#(and (if include-unpacked? true (:iir %))
(if-not (boolean? enabled?) true (= (not enabled?) (boolean (get-in % [:settings :disabled]))))
(= (boolean theme?) (:theme %)))
(or include-all? (= (boolean theme?) (:theme %))))
(vals (:plugin/installed-plugins @state)))))
(defn get-all-enabled?-installed-plugins
([] (get-all-enabled?-installed-plugins true true))
([enabled? include-unpacked?]
(get-enabled?-installed-plugins nil enabled? include-unpacked? true)))
(defn lsp-enabled?-or-theme
[]
(:plugin/enabled @state))