diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-08-23 23:20:54 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-08-23 23:20:54 +0000 |
commit | 3de1f19b435695a7312f015d30316442b493ebd9 (patch) | |
tree | b01e42d5e311bd5515d62159792a8b31b368a7bd /src/Text | |
parent | 7bf966f934e45af4d2b8f6264fa26ea5fdbbe218 (diff) | |
download | pandoc-3de1f19b435695a7312f015d30316442b493ebd9.tar.gz |
Removed incorrect "{}" around style information in
HTML tables. Adjusted test suite accordingly. Column
widths now work properly in HTML.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@882 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src/Text')
-rw-r--r-- | src/Text/Pandoc/Writers/HTML.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs index cad0915df..e234b7fca 100644 --- a/src/Text/Pandoc/Writers/HTML.hs +++ b/src/Text/Pandoc/Writers/HTML.hs @@ -347,8 +347,8 @@ tableItemToHtml opts tag align' width item = do contents <- blockListToHtml opts item let attrib = [align align'] ++ if width /= 0 - then [thestyle ("{width: " ++ show (truncate (100*width)) ++ - "%;}")] + then [thestyle ("width: " ++ show (truncate (100*width)) ++ + "%;")] else [] return $ tag ! attrib $ contents |