d32878b · typeable/pandoc

git.iko.soy/typeable/pandoc

Org writer: print empty table rows

Empty table rows should not be dropped from the output, so row-height is always set to be at least 1.

commitd32878b84b08f2f8e007b9b06c393a41e2ebe5fe authorAlbert Krewinkel <albert@zeitkraut.de> dateMon 9 May 2016, 18:53 (10 years ago) parent10a809f

1 file changed+1−1

unifiedsplit

src/Text/Pandoc/Writers/Org.hs+1−1

@@ -170,7 +170,7 @@ blockToOrg (Table caption' _ _ headers rows) = do

170170 map ((+2) . numChars) $ transpose (headers' : rawRows)

171171 -- FIXME: Org doesn't allow blocks with height more than 1.

172172 let hpipeBlocks blocks = hcat [beg, middle, end]

173− where h = maximum (map height blocks)

173+ where h = maximum (1 : map height blocks)

174174 sep' = lblock 3 $ vcat (map text $ replicate h " | ")

175175 beg = lblock 2 $ vcat (map text $ replicate h "| ")

176176 end = lblock 2 $ vcat (map text $ replicate h " |")