mirror of
https://github.com/penpot/penpot.git
synced 2025-03-11 23:31:21 -05:00
🐛 Fix problem with flex propagation
This commit is contained in:
parent
a64854bf72
commit
b8b40fc7ef
1 changed files with 8 additions and 2 deletions
|
@ -92,5 +92,11 @@
|
||||||
(defn resolve-subtree
|
(defn resolve-subtree
|
||||||
"Resolves the subtree but only partialy from-to the parameters"
|
"Resolves the subtree but only partialy from-to the parameters"
|
||||||
[from-id to-id objects]
|
[from-id to-id objects]
|
||||||
|
(concat
|
||||||
(->> (get-children-seq from-id objects)
|
(->> (get-children-seq from-id objects)
|
||||||
(d/take-until #(= (:id %) to-id))))
|
(d/take-until #(= (:id %) to-id)))
|
||||||
|
|
||||||
|
;; Add the children of `to-id` to the subtree. Rest is to remove the
|
||||||
|
;; to-id element that is already on the previous sequence
|
||||||
|
(->> (get-children-seq to-id objects)
|
||||||
|
rest)))
|
||||||
|
|
Loading…
Add table
Reference in a new issue