Fix text dimension styles
This commit is contained in:
@@ -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
|
||||||
|
|||||||
Reference in New Issue
Block a user