HTML reader: Fixed bug parsing tables w both thead and tbody.

See bug #274, which was not completely fixed by the last patch.
2011-08-01 11:55:55 -07:00 · 2011-08-01 11:55:55 -07:00 · 6c639d3420
commit 6c639d3420
parent bf26ae1dbd
1 changed files with 1 additions and 0 deletions
--- a/src/Text/Pandoc/Readers/HTML.hs
+++ b/src/Text/Pandoc/Readers/HTML.hs
@ -215,6 +215,7 @@ pSimpleTable = try $ do
  TagOpen _ _ <- pSatisfy (~== TagOpen "table" [])
  skipMany pBlank
  head' <- option [] $ pOptInTag "thead" $ pInTags "tr" (pCell "th")
+  skipMany pBlank
  rows <- pOptInTag "tbody"
          $ many1 $ try $ skipMany pBlank >> pInTags "tr" (pCell "td")
  skipMany pBlank