mirror of
https://github.com/penpot/penpot.git
synced 2025-05-10 22:16:38 +02:00
🐛 Fix problem with geometry of groups
This commit is contained in:
parent
d0878aa805
commit
fae76f6d4e
1 changed files with 3 additions and 2 deletions
|
@ -382,10 +382,11 @@
|
||||||
|
|
||||||
(defn update-group-selrect
|
(defn update-group-selrect
|
||||||
[group children]
|
[group children]
|
||||||
(let [shape-center (gco/center-shape group)
|
(let [;; Points for every shape inside the group
|
||||||
;; Points for every shape inside the group
|
|
||||||
points (->> children (mapcat :points))
|
points (->> children (mapcat :points))
|
||||||
|
|
||||||
|
shape-center (gco/center-points points)
|
||||||
|
|
||||||
;; Fixed problem with empty groups. Should not happen (but it does)
|
;; Fixed problem with empty groups. Should not happen (but it does)
|
||||||
points (if (empty? points) (:points group) points)
|
points (if (empty? points) (:points group) points)
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue