aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2012-03-12 08:36:40 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2012-03-12 08:36:40 -0700
commit1b1d7d570a4724de251e3ea2512dc91cf02a57f9 (patch)
tree4b3199f1e0864c96224ceffb5190fc11b21621e7
parenta7688447511feda6284b130d6b612e00410b0161 (diff)
parente838cca4e6a9335446addc2618a91e6d6ecc202a (diff)
downloadpandoc-1b1d7d570a4724de251e3ea2512dc91cf02a57f9.tar.gz
Merge pull request #444 from trofi/master
fix doc generation failure against haddock-2.10.0
-rw-r--r--src/Text/Pandoc/Readers/Textile.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Text/Pandoc/Readers/Textile.hs b/src/Text/Pandoc/Readers/Textile.hs
index 3b5954368..f33436835 100644
--- a/src/Text/Pandoc/Readers/Textile.hs
+++ b/src/Text/Pandoc/Readers/Textile.hs
@@ -228,14 +228,14 @@ bulletListItemAtDepth depth = try $ do
return (p:sublist)
-- | Ordered List of given depth, depth being the number of
--- leadingĀ '#'
+-- leading '#'
orderedListAtDepth :: Int -> GenParser Char ParserState Block
orderedListAtDepth depth = try $ do
items <- many1 (orderedListItemAtDepth depth)
return (OrderedList (1, DefaultStyle, DefaultDelim) items)
-- | Ordered List Item of given depth, depth being the number of
--- leadingĀ '#'
+-- leading '#'
orderedListItemAtDepth :: Int -> GenParser Char ParserState [Block]
orderedListItemAtDepth depth = try $ do
count depth (char '#')