diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2010-03-07 19:35:06 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2010-03-07 19:35:06 +0000 |
commit | e9de86de2df265de24a937d14146518042af1bc3 (patch) | |
tree | 63af685fd5b255adeac7954c74cce87e1c38126f /src/Text/Pandoc/Writers | |
parent | 44bbe5c7deda6db9a69632ea7812409178b06438 (diff) | |
download | pandoc-e9de86de2df265de24a937d14146518042af1bc3.tar.gz |
Fixed docbook writer for headerless tables.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1863 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src/Text/Pandoc/Writers')
-rw-r--r-- | src/Text/Pandoc/Writers/Docbook.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Text/Pandoc/Writers/Docbook.hs b/src/Text/Pandoc/Writers/Docbook.hs index 294c043e2..996e50e6b 100644 --- a/src/Text/Pandoc/Writers/Docbook.hs +++ b/src/Text/Pandoc/Writers/Docbook.hs @@ -181,6 +181,7 @@ colHeadsToDocbook :: WriterOptions -> [Double] -> [[Block]] -> Doc +colHeadsToDocbook _ _ _ hs | all null hs = empty colHeadsToDocbook opts alignStrings widths headers = let heads = zipWith3 (\align width item -> tableItemToDocbook opts "th" align width item) |