🐛 Fixes problem with multiple selection and groups

This commit is contained in:
alonso.torres 2021-02-11 14:43:54 +01:00
parent b7d3158514
commit 10cad69fac
2 changed files with 4 additions and 2 deletions

View file

@ -152,8 +152,9 @@
(-> values
(merge-attrs (select-keys shape attrs))
(merge-attrs (ut/get-text-attrs-multi content attrs)))]
:children (let [children (->> (:shapes shape []) (map #(get objects %)))]
(get-attrs children objects attr-type))
:children (let [children (->> (:shapes shape []) (map #(get objects %)))
[new-ids new-values] (get-attrs children objects attr-type)]
[(d/concat ids new-ids) (merge-attrs values new-values)])
[])]
result))]
(reduce extract-attrs [[] []] shapes)))