diff options
Diffstat (limited to 'Text/Pandoc/Writers/Docbook.hs')
-rw-r--r-- | Text/Pandoc/Writers/Docbook.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Text/Pandoc/Writers/Docbook.hs b/Text/Pandoc/Writers/Docbook.hs index ac7c9da12..d089116cf 100644 --- a/Text/Pandoc/Writers/Docbook.hs +++ b/Text/Pandoc/Writers/Docbook.hs @@ -195,7 +195,7 @@ tableItemToDocbook opts tag align width item = let attrib = [("align", align)] ++ if width /= 0 then [("style", "{width: " ++ - show (truncate (100*width)) ++ "%;}")] + show (truncate (100*width) :: Integer) ++ "%;}")] else [] in inTags True tag attrib $ vcat $ map (blockToDocbook opts) item |