From 06983c9ba5e7c051b9c85969f1cf5fa1922044fc Mon Sep 17 00:00:00 2001 From: fiddlosopher Date: Wed, 23 Jul 2008 23:10:05 +0000 Subject: Markdown reader: Parse setext headers before atx headers. Test case: # hi ==== parsed by Markdown.pl as an H1 header with contents "# hi". git-svn-id: https://pandoc.googlecode.com/svn/trunk@1334 788f1e2b-df1e-0410-8736-df70ead52e1b --- Text/Pandoc/Readers/Markdown.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Text/Pandoc/Readers') diff --git a/Text/Pandoc/Readers/Markdown.hs b/Text/Pandoc/Readers/Markdown.hs index db9e214b0..712d66a37 100644 --- a/Text/Pandoc/Readers/Markdown.hs +++ b/Text/Pandoc/Readers/Markdown.hs @@ -284,7 +284,7 @@ block = do -- header :: GenParser Char ParserState Block -header = atxHeader <|> setextHeader "header" +header = setextHeader <|> atxHeader "header" atxHeader :: GenParser Char ParserState Block atxHeader = try $ do -- cgit v1.2.3