Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-18 13:04:38 -05:00
Code Issues Activity

📎 Fix function naming

Browse source 
Rename `all-frames-by-position` to `get-frames-by-position`
This commit is contained in:
Andrey Antukh 2023-08-25 11:08:11 +02:00 • committed by Andrés Moya
parent 9cc7f3c600
commit ec1c1fcd2f
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
common/src/app/common/types/shape_tree.cljc
View file

@ -274,13 +274,13 @@
(let [frame-id (frame-id-by-position objects position options)] (let [frame-id (frame-id-by-position objects position options)]
(get objects frame-id)))) (get objects frame-id))))
(defn all-frames-by-position (defn get-frames-by-position
([objects position] (all-frames-by-position objects position nil)) ([objects position] (get-frames-by-position objects position nil))
([objects position options] ([objects position options]
(->> (get-frames objects options) (->> (get-frames objects options)
(filter #(and ^boolean (some? position) (filter #(and ^boolean (some? position)
^boolean (gsh/has-point? % position))) ^boolean (gsh/has-point? % position)))
(sort-z-index-objets objects)))) (sort-z-index-objects objects))))
(defn top-nested-frame (defn top-nested-frame
"Search for the top nested frame for positioning shapes when moving or creating. "Search for the top nested frame for positioning shapes when moving or creating.
@ -292,7 +292,7 @@
([objects position excluded] ([objects position excluded]
(assert (or (nil? excluded) (set? excluded))) (assert (or (nil? excluded) (set? excluded)))
(let [frames (cond->> (all-frames-by-position objects position) (let [frames (cond->> (get-frames-by-position objects position)
(some? excluded) (some? excluded)
(remove (fn [obj] (remove (fn [obj]
(let [id (dm/get-prop obj :id)] (let [id (dm/get-prop obj :id)]