From a74010a051e4cd3fee7ebfb4a632d52bb32de61d Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Sat, 22 Jan 2011 16:04:32 -0800
Subject: Markdown reader: slight speedup by moving whitespace parser.

---
 src/Text/Pandoc/Readers/Markdown.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/Text')

diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs
index 30106e1ba..0334cf8f4 100644
--- a/src/Text/Pandoc/Readers/Markdown.hs
+++ b/src/Text/Pandoc/Readers/Markdown.hs
@@ -895,8 +895,8 @@ inline :: GenParser Char ParserState Inline
 inline = choice inlineParsers <?> "inline"
 
 inlineParsers :: [GenParser Char ParserState Inline]
-inlineParsers = [ str
-                , whitespace
+inlineParsers = [ whitespace
+                , str
                 , endline
                 , code
                 , (fourOrMore '*' <|> fourOrMore '_')
-- 
cgit v1.2.3