diff options
| author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2008-11-01 22:58:44 +0000 |
|---|---|---|
| committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2008-11-01 22:58:44 +0000 |
| commit | 412315b530706ef88b534cec8cd8d32b29271a54 (patch) | |
| tree | 88d3be96a9002c30d4e6634bbef1ba7999630f7d /Text/Pandoc | |
| parent | a24d107e6f9247af0cefc73e797ad4aa441af7e3 (diff) | |
| download | pandoc-412315b530706ef88b534cec8cd8d32b29271a54.tar.gz | |
Markdown reader: Allow blank space at end of horizontal rules.
git-svn-id: https://pandoc.googlecode.com/svn/trunk@1480 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'Text/Pandoc')
| -rw-r--r-- | Text/Pandoc/Readers/Markdown.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Text/Pandoc/Readers/Markdown.hs b/Text/Pandoc/Readers/Markdown.hs index 205472d29..f6d2f9805 100644 --- a/Text/Pandoc/Readers/Markdown.hs +++ b/Text/Pandoc/Readers/Markdown.hs @@ -314,7 +314,7 @@ hrule = try $ do skipSpaces start <- oneOf hruleChars count 2 (skipSpaces >> char start) - skipMany (skipSpaces >> char start) + skipMany (oneOf spaceChars <|> char start) newline optional blanklines return HorizontalRule |