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

Enhance/Settings UI of plugins (#4035)

Browse Source 
more settings types & polish releated ui
This commit is contained in:
Charlie
2022-02-17 10:00:53 +08:00
committed by GitHub
parent 736a4610e6
commit 24b0236b7d
24 changed files with 1028 additions and 472 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -56,6 +56,7 @@
:search/graph-filters []
;; modals
:modal/id nil
:modal/label ""
:modal/show? false
:modal/panel-content nil
@@ -169,6 +170,8 @@
:plugin/updates-coming {}
:plugin/updates-downloading? false
:plugin/updates-unchecked #{}
:plugin/navs-settings? true
:plugin/focused-settings nil ;; plugin id
;; pdf
:pdf/current nil
@@ -1062,6 +1065,7 @@
(:modal/show? @state))
(declare set-modal!)
(declare close-modal!)
(defn get-sub-modals
[]
@@ -1094,11 +1098,14 @@
([all?-a-id]
(if (true? all?-a-id)
(swap! state assoc :modal/subsets [])
(let [id all?-a-id
(let [id all?-a-id
mid (:modal/id @state)
modals (:modal/subsets @state)]
(when-let [idx (if id (first (keep-indexed #(when (= (:modal/id %2) id) %1) modals))
(dec (count modals)))]
(swap! state assoc :modal/subsets (into [] (medley/remove-nth idx modals))))))
(if (and id (not (string/blank? mid)) (= id mid))
(close-modal!)
(when-let [idx (if id (first (keep-indexed #(when (= (:modal/id %2) id) %1) modals))
(dec (count modals)))]
(swap! state assoc :modal/subsets (into [] (medley/remove-nth idx modals)))))))
(:modal/subsets @state)))
(defn set-modal!
@@ -1106,10 +1113,11 @@
(set-modal! modal-panel-content
{:fullscreen? false
:close-btn? true}))
([modal-panel-content {:keys [label fullscreen? close-btn? center?]}]
([modal-panel-content {:keys [id label fullscreen? close-btn? center?]}]
(when (seq (get-sub-modals))
(close-sub-modal! true))
(swap! state assoc
:modal/id id
:modal/label (or label (if center? "ls-modal-align-center" ""))
:modal/show? (boolean modal-panel-content)
:modal/panel-content modal-panel-content
@@ -1121,6 +1129,7 @@
(if (seq (get-sub-modals))
(close-sub-modal!)
(swap! state assoc
:modal/id nil
:modal/label ""
:modal/show? false
:modal/fullscreen? false
@@ -1526,13 +1535,19 @@
[]
(:ui/visual-viewport-state @state))
(defn get-enabled-installed-plugins
[theme?]
(filterv
#(and (:iir %)
(not (get-in % [:settings :disabled]))
(= (boolean theme?) (:theme %)))
(vals (:plugin/installed-plugins @state))))
(defn get-plugin-by-id
[id]
(when-let [id (and id (keyword id))]
(get-in @state [:plugin/installed-plugins id])))
(defn get-enabled?-installed-plugins
([theme?] (get-enabled?-installed-plugins theme? true false))
([theme? enabled? include-unpacked?]
(filterv
#(and (if include-unpacked? true (:iir %))
(if-not (boolean? enabled?) true (= (not enabled?) (boolean (get-in % [:settings :disabled]))))
(= (boolean theme?) (:theme %)))
(vals (:plugin/installed-plugins @state)))))
(defn lsp-enabled?-or-theme
[]