diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-08-19 00:06:03 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-08-19 00:06:03 +0000 |
commit | 4e149f898a3fff677e042f670f04a7d42c78edd3 (patch) | |
tree | 903bbe6c97a7eb532f1516575afa9a932c95566f /src/Text | |
parent | 4399db4fd2d3f1f936e21cd0fe732142a7fccab2 (diff) | |
download | pandoc-4e149f898a3fff677e042f670f04a7d42c78edd3.tar.gz |
Added a necessary "try" in definition of "para"
(HTML reader).
git-svn-id: https://pandoc.googlecode.com/svn/trunk@863 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'src/Text')
-rw-r--r-- | src/Text/Pandoc/Readers/HTML.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Readers/HTML.hs b/src/Text/Pandoc/Readers/HTML.hs index ac3947ad1..caf2b7f5f 100644 --- a/src/Text/Pandoc/Readers/HTML.hs +++ b/src/Text/Pandoc/Readers/HTML.hs @@ -395,7 +395,8 @@ definitionListItem = try $ do -- paragraph block -- -para = htmlTag "p" >> inlinesTilEnd "p" >>= return . Para . normalizeSpaces +para = try $ htmlTag "p" >> inlinesTilEnd "p" >>= + return . Para . normalizeSpaces -- -- plain block |