@@ -24,8 +24,20 @@ backgroundImage' ∷ StyleProperty → Style
2424backgroundImage' = css <<< { backgroundImage: _ }
2525
2626svgBackgroundImage ∷ JSX → Style
27−svgBackgroundImage jsx = backgroundImage
28− $ "url('data:image/svg+xml;utf8,"
27+svgBackgroundImage = backgroundImage <<< embeddedJSX
28+
29+maskImage :: String -> Style
30+maskImage = maskImage' <<< str
31+
32+maskImage' :: StyleProperty -> Style
33+maskImage' = css <<< { maskImage: _ }
34+
35+svgMaskImage ∷ JSX → Style
36+svgMaskImage = maskImage <<< embeddedJSX
37+
38+embeddedJSX ∷ JSX → String
39+embeddedJSX jsx =
40+ "url('data:image/svg+xml;utf8,"
2941 <> renderToStaticMarkup jsx
3042 <> "')"
3143