0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-23 23:18:48 -05:00

🐛 Fix problem when moving svgs

This commit is contained in:
alonso.torres 2024-01-16 10:13:28 +01:00 committed by Andrés Moya
parent 6c4d757ecb
commit 744c60cdef
2 changed files with 9 additions and 7 deletions

View file

@ -72,13 +72,6 @@
(and (some? shape)
(= :bool (dm/get-prop shape :type))))
(defn group-like-shape?
([objects id]
(group-like-shape? (get objects id)))
([shape]
(or ^boolean (group-shape? shape)
^boolean (bool-shape? shape))))
(defn text-shape?
[shape]
(and (some? shape)
@ -123,6 +116,14 @@
([shape]
(d/not-empty? (:shapes shape))))
(defn group-like-shape?
([objects id]
(group-like-shape? (get objects id)))
([shape]
(or ^boolean (group-shape? shape)
^boolean (bool-shape? shape)
^boolean (and (svg-raw-shape? shape) (has-children? shape)))))
;; ---- ACCESSORS
(defn get-children-ids

View file

@ -64,6 +64,7 @@
font-size: $fs-10;
text-transform: uppercase;
margin-inline-start: $s-4;
color: $df-primary;
}
.attr-row {