git.iko.soy/typeable/pandoc
on master help sign in
Minor reformatting.
commitba19dff8af7a103ed67d390d219727821d8ac4be authorJohn MacFarlane <jgm@berkeley.edu> dateMon 5 Jul 2010, 20:41 (16 years ago) parent8699461
1 file changed+4−2
src/Text/Pandoc/Parsing.hs+4−2
src/Text/Pandoc/Parsing.hs+4−2
@@ -440,13 +440,15 @@ gridTableHeader headless = try $ do
440440 rawContent <- if headless
441441 then return $ repeat ""
442442 else many1
443− (notFollowedBy (gridTableSep '=') >> char '|' >> many1Till anyChar newline)
443+ (notFollowedBy (gridTableSep '=') >> char '|' >>
444+ many1Till anyChar newline)
444445 if headless
445446 then return ()
446447 else gridTableSep '=' >> return ()
447448 let lines' = map snd dashes
448449 let indices = scanl (+) 0 lines'
449− let aligns = replicate (length lines') AlignDefault -- RST does not have a notion of alignments
450+ let aligns = replicate (length lines') AlignDefault
451+ -- RST does not have a notion of alignments
450452 let rawHeads = if headless
451453 then replicate (length dashes) ""
452454 else map (intercalate " ") $ transpose