Fix text dimension styles

This commit is contained in:
Nathan McRae
2025-08-15 20:52:31 -07:00
parent 77942030ef
commit 1b13f3ba38

View File

@@ -68,12 +68,12 @@ getTextDimensions htmlDoc style text = do
let styleText = ( let styleText = (
"font" <> style.typeface "font" <> style.typeface
<> ";font: " <> style.typeface <> ";font-family: " <> style.typeface
<> ";fontSize: " <> (toString style.sizePx) <> "px" <> ";font-size: " <> (toString style.sizePx) <> "px"
<> ";height: " <> "auto" <> ";height: " <> "auto"
<> ";width: " <> "auto" <> ";width: " <> "auto"
<> ";position: " <> "absolute" <> ";position: " <> "absolute"
<> ";whiteSpace: " <> "no-wrap" <> ";white-space: " <> "nowrap"
) )
Element.setAttribute "style" styleText el Element.setAttribute "style" styleText el