From 07f25fb13c2248f4a1cc0e34fa35b6c250e62a61 Mon Sep 17 00:00:00 2001 From: fiddlosopher Date: Fri, 12 Feb 2010 03:03:23 +0000 Subject: LaTeX reader: treat \paragraph and \subparagraph as level 4, 5 headers. Resolves Issue #207. git-svn-id: https://pandoc.googlecode.com/svn/trunk@1838 788f1e2b-df1e-0410-8736-df70ead52e1b --- src/Text/Pandoc/Readers/LaTeX.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/Text/Pandoc/Readers/LaTeX.hs') diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs index 85f9fcbf0..f8ab8b8b9 100644 --- a/src/Text/Pandoc/Readers/LaTeX.hs +++ b/src/Text/Pandoc/Readers/LaTeX.hs @@ -169,12 +169,12 @@ header :: GenParser Char ParserState Block header = try $ do char '\\' subs <- many (try (string "sub")) - string "section" + base <- try (string "section" >> return 1) <|> (string "paragraph" >> return 4) optional (char '*') char '{' title' <- manyTill inline (char '}') spaces - return $ Header (length subs + 1) (normalizeSpaces title') + return $ Header (length subs + base) (normalizeSpaces title') -- -- hrule block -- cgit v1.2.3