MediaWiki reader: Allow Image: for images.

Closes #971.
2013-09-06 15:40:08 -07:00 · 2013-09-06 15:40:08 -07:00 · 728e47ae15
commit 728e47ae15
parent f49749c46d
1 changed files with 1 additions and 1 deletions
--- a/src/Text/Pandoc/Readers/MediaWiki.hs
+++ b/src/Text/Pandoc/Readers/MediaWiki.hs
@ -523,7 +523,7 @@ endline = () <$ try (newline <*
 image :: MWParser Inlines
 image = try $ do
  sym "[["
-  sym "File:"
+  sym "File:" <|> sym "Image:"
  fname <- many1 (noneOf "|]")
  _ <- many (try $ char '|' *> imageOption)
  caption <-   (B.str fname <$ sym "]]")