Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-25 07:58:49 -05:00
Code Issues Activity

Preselect first icons collection with content on the workspace

Browse source
This commit is contained in:
Jesús Espino 2016-12-22 17:22:02 +01:00
parent c6d60b5fbf
commit 19a98e6586
1 changed files with 13 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
frontend/src/uxbox/main/ui/workspace/sidebar/icons.cljs
View file

@ -52,6 +52,16 @@
(remove-watch local ::key)
own))
(defn- get-or-select-coll
[local colls-map]
(if (:id @local)
(get colls-map (:id @local))
(let [colls (->> (vals colls-map)
(sort-by :name))
selected-coll (first (filter #(> (:num-icons %) 0) colls))]
(swap! local assoc :id (:id selected-coll)
selected-coll))))
(mx/defcs icons-toolbox
{:mixins [(mx/local) mx/reactive]
:will-mount icons-toolbox-will-mount
@ -62,11 +72,10 @@
colls-map (mx/react icons/collections-ref)
colls (->> (vals colls-map)
(sort-by :name))
coll (get colls-map (:id @local))
selected-coll (get-or-select-coll local colls-map)
icons (mx/react icons/icons-ref)
icons (->> (vals icons)
(filter #(= (:id coll) (:collection %))))]
(filter #(= (:id selected-coll) (:collection %))))]
(letfn [(on-close [event]
(st/emit! (dw/toggle-flag :icons)))
@ -86,7 +95,7 @@
[:div.figures-catalog
;; extract component: set selector
[:select.input-select.small {:on-change on-change
:value (pr-str (:id coll))}
:value (pr-str (:id selected-coll))}
[:option {:value (pr-str nil)} "Storage"]
(for [coll colls]
[:option {:key (str "icon-coll" (:id coll))