From b703c76540ebdfd026d4bd3c48bb3f03dd459d2b Mon Sep 17 00:00:00 2001
From: John MacFarlane <fiddlosopher@gmail.com>
Date: Wed, 12 Sep 2012 19:54:56 -0700
Subject: MediaWiki reader: Support `<math>` tag.

---
 src/Text/Pandoc/Readers/MediaWiki.hs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'src/Text/Pandoc')

diff --git a/src/Text/Pandoc/Readers/MediaWiki.hs b/src/Text/Pandoc/Readers/MediaWiki.hs
index 3bf4a0cdb..8805d528a 100644
--- a/src/Text/Pandoc/Readers/MediaWiki.hs
+++ b/src/Text/Pandoc/Readers/MediaWiki.hs
@@ -39,7 +39,6 @@ _ support internal links http://www.mediawiki.org/wiki/Help:Links
 _ support external links (partially implemented)
 _ support images http://www.mediawiki.org/wiki/Help:Images
 _ support tables http://www.mediawiki.org/wiki/Help:Tables
-_ support <math> tag for latex math
 _ raw mediawiki:
   _ templates or anything in {{}} (can be postprocessed)
   _ category links
@@ -259,6 +258,7 @@ inline =  whitespace
       <|> strikeout
       <|> subscript
       <|> superscript
+      <|> math
       <|> code
       <|> hask
       <|> B.singleton <$> charRef
@@ -320,6 +320,9 @@ superscript = B.superscript <$> inlinesInTags "sup"
 subscript :: MWParser Inlines
 subscript = B.subscript <$> inlinesInTags "sub"
 
+math :: MWParser Inlines
+math = B.math <$> charsInTags "math"
+
 code :: MWParser Inlines
 code = B.code <$> (charsInTags "code" <|> charsInTags "tt")
 
-- 
cgit v1.2.3