🐛 Fix problem with strokes and texts

This commit is contained in:
alonso.torres 2022-03-14 17:21:26 +01:00
parent e188ae732a
commit 10e981d034

View file

@ -332,9 +332,15 @@
(obj/set! props "fill" (str "url(#fill-0-" render-id ")")) (obj/set! props "fill" (str "url(#fill-0-" render-id ")"))
(and last-stroke? one-fill?) (and last-stroke? one-fill?)
(obj/merge! (let [fill-props
props (attrs/extract-fill-attrs (get-in shape [:fills 0]) render-id 0)
(attrs/extract-fill-attrs (get-in shape [:fills 0]) render-id 0))
style (-> (obj/get props "style")
(obj/clone)
(obj/merge! (obj/get fill-props "style")))]
(cond-> (obj/merge! props fill-props)
(some? style)
(obj/set! "style" style)))
:else :else
(-> props (-> props