M Graphics/Layout/CSS.hs => Graphics/Layout/CSS.hs +1 -1
@@ 133,7 133,7 @@ instance PropertyParser a => PropertyParser (CSSBox a) where
longhand CSSBox { display = Table } self "display" [Ident "table-caption"] =
Just self { display=TableCaption }
longhand _ self "display" [Ident "inline"] = Just self { display = Inline }
- longhand _ self "display" [Ident "initial"] = Just self { display = Block }
+ longhand _ self "display" [Ident "initial"] = Just self { display = Inline }
longhand _ self "caption-side" [Ident "top"] = Just self { captionBelow = False }
longhand _ self "caption-side" [Ident "bottom"] = Just self { captionBelow = True }