aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Readers/LaTeX.hs
diff options
context:
space:
mode:
authorfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-08-18 23:44:26 +0000
committerfiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>2007-08-18 23:44:26 +0000
commit4399db4fd2d3f1f936e21cd0fe732142a7fccab2 (patch)
treed802297f18549fff45ef9be39f75caad54aa641b /src/Text/Pandoc/Readers/LaTeX.hs
parente48f046aa024fea9f806368796eaaaed1f09ceaf (diff)
downloadpandoc-4399db4fd2d3f1f936e21cd0fe732142a7fccab2.tar.gz
Bug fixes in readers:
+ LaTeX reader: skip anything after \end{document} + HTML reader: fixed bug skipping material after </html> -- previously, stuff at the end was skipped even if no </html> was present, which meant only part of the file would be parsed and no error issued + HTML reader: added new constant eitherBlockOrInline with elements that may count either as block-level or inline + Modified isInline and isBlock to take this into account + modified rawHtmlBlock to accept any tag (even an inline tag); this is innocuous, because rawHtmlBlock is tried only if a regular inline element can't be parsed. git-svn-id: https://pandoc.googlecode.com/svn/trunk@862 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src/Text/Pandoc/Readers/LaTeX.hs')
-rw-r--r--src/Text/Pandoc/Readers/LaTeX.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs
index 84bda1942..9440b446a 100644
--- a/src/Text/Pandoc/Readers/LaTeX.hs
+++ b/src/Text/Pandoc/Readers/LaTeX.hs
@@ -117,7 +117,8 @@ parseLaTeX = do
spaces
blocks <- parseBlocks
spaces
- optional $ try (string "\\end{document}") -- might not be present (fragment)
+ optional $ try (string "\\end{document}" >> many anyChar)
+ -- might not be present (fragment)
spaces
eof
state <- getState