From 998695001abae17faa879ad31a3284d7c629a621 Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Thu, 28 Mar 2013 10:51:14 -0700 Subject: Mediawiki reader: Fixed last commit. --- src/Text/Pandoc/Readers/MediaWiki.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Text') diff --git a/src/Text/Pandoc/Readers/MediaWiki.hs b/src/Text/Pandoc/Readers/MediaWiki.hs index 21b7363ff..9baed3cd3 100644 --- a/src/Text/Pandoc/Readers/MediaWiki.hs +++ b/src/Text/Pandoc/Readers/MediaWiki.hs @@ -336,7 +336,7 @@ preformatted = try $ do (htmlTag (~== TagOpen "nowiki" []) *> manyTill anyChar (htmlTag (~== TagClose "nowiki"))) let inline' = whitespace' <|> endline' <|> nowiki' - <|> (notFollowedBy newline *> inline) + <|> (try $ notFollowedBy newline *> inline) let strToCode (Str s) = Code ("",[],[]) s strToCode x = x contents <- mconcat <$> many1 inline' -- cgit v1.2.3