Fix text dimension styles
This commit is contained in:
@@ -68,12 +68,12 @@ getTextDimensions htmlDoc style text = do
|
||||
|
||||
let styleText = (
|
||||
"font" <> style.typeface
|
||||
<> ";font: " <> style.typeface
|
||||
<> ";fontSize: " <> (toString style.sizePx) <> "px"
|
||||
<> ";font-family: " <> style.typeface
|
||||
<> ";font-size: " <> (toString style.sizePx) <> "px"
|
||||
<> ";height: " <> "auto"
|
||||
<> ";width: " <> "auto"
|
||||
<> ";position: " <> "absolute"
|
||||
<> ";whiteSpace: " <> "no-wrap"
|
||||
<> ";white-space: " <> "nowrap"
|
||||
)
|
||||
|
||||
Element.setAttribute "style" styleText el
|
||||
|
||||
Reference in New Issue
Block a user