3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-06-25 18:17:00 +02:00
Code Issues Projects Releases Packages Wiki Activity

✨ Add minor naming change on process selected fn

Browse source
This commit is contained in:
Andrey Antukh 2025-05-29 11:15:46 +02:00
parent 2a04f78337
commit 3a27a5a542
3 changed files with 11 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

8
frontend/src/app/main/data/helpers.cljs
View file

@ -64,15 +64,15 @@
(-> (lookup-page state file-id page-id)
(get :objects))))
(defn process-selected-shapes
(defn process-selected
([objects selected]
(process-selected-shapes objects selected nil))
(process-selected objects selected nil))
([objects selected {:keys [omit-blocked?] :or {omit-blocked? false}}]
(letfn [(selectable? [id]
(and (contains? objects id)
(or (not omit-blocked?)
(not (get-in objects [id :blocked] false)))))]
(not (dm/get-in objects [id :blocked] false)))))]
(let [selected (->> selected (cfh/clean-loops objects))]
(into (d/ordered-set)
(filter selectable?)
@ -95,7 +95,7 @@
([state page-id options]
(let [objects (lookup-page-objects state page-id)
selected (dm/get-in state [:workspace-local :selected])]
(process-selected-shapes objects selected options))))
(process-selected objects selected options))))
(defn lookup-shape
([state id]

4
frontend/src/app/main/data/workspace/bool.cljs
View file

@ -69,8 +69,8 @@
(-> type d/name str/capital)
ids
(->> (or ids (dsh/lookup-selected state))
(cph/clean-loops objects))
(->> (or ids (dsh/get-selected-ids state))
(dsh/process-selected objects))
xform
(comp

9
frontend/src/app/main/refs.cljs
View file

@ -159,14 +159,15 @@
(let [objects (dsh/lookup-page-objects state)
selected (dm/get-in state [:workspace-local :selected])]
{:objects objects :selected selected}))
st/state (fn [v1 v2]
(and (identical? (:objects v1) (:objects v2))
(= (:selected v1) (:selected v2))))))
st/state
(fn [v1 v2]
(and (identical? (:objects v1) (:objects v2))
(= (:selected v1) (:selected v2))))))
(def selected-shapes
(l/derived
(fn [{:keys [objects selected]}]
(dsh/process-selected-shapes objects selected))
(dsh/process-selected objects selected))
selected-shapes-data =))
(defn make-selected-ref