From 71b4700669162ea904a78c80d4f236d4ca13303f Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Tue, 13 Jul 2010 19:22:41 -0700
Subject: Made latex \section, \chapter parsers more forgiving of whitespace.

---
 src/Text/Pandoc/Readers/LaTeX.hs | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'src/Text')

diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs
index 8d4f67edc..406809dfc 100644
--- a/src/Text/Pandoc/Readers/LaTeX.hs
+++ b/src/Text/Pandoc/Readers/LaTeX.hs
@@ -190,8 +190,11 @@ section = try $ do
 
 headerWithLevel :: Int -> GenParser Char ParserState Block
 headerWithLevel lev = try $ do
+  spaces
   optional (char '*')
+  spaces
   optional $ bracketedText '[' ']' -- alt title
+  spaces
   char '{'
   title' <- manyTill inline (char '}')
   spaces
-- 
cgit v1.2.3