0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-04-16 00:41:25 -05:00

🐛 Fix outline corner radius

This commit is contained in:
Alejandro Alonso 2023-01-27 07:47:41 +01:00 committed by Alonso Torres
parent e0441bc16a
commit 2dbeda1d8f

View file

@ -35,11 +35,11 @@
(or (ex/ignoring (upf/format-path (:content shape)))
"")))
{:keys [x y width height selrect rx ry]} shape
{:keys [x y width height selrect]} shape
border-radius-attrs (.-d (attrs/extract-border-radius shape))
border-radius-attrs (attrs/extract-border-radius shape)
path? (some? border-radius-attrs)
path? (some? (.-d border-radius-attrs))
outline-type (case (:type shape)
:circle "ellipse"
@ -67,8 +67,8 @@
:y (:y selrect)
:width (:width selrect)
:height (:height selrect)
:rx rx
:ry ry
:rx (.-rx border-radius-attrs)
:ry (.-ry border-radius-attrs)
:d border-radius-attrs})]
[:> outline-type (map->obj (merge common props))]))