From 417cde38af7a77e79f12c9f78b678aec50701af2 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Fri, 10 Aug 2012 21:51:54 -0700
Subject: Changed Ext_tex_math to Ext_tex_math_dollars.

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

(limited to 'src')

diff --git a/src/Text/Pandoc/Options.hs b/src/Text/Pandoc/Options.hs
index 1e4ce98ba..9c6d55f25 100644
--- a/src/Text/Pandoc/Options.hs
+++ b/src/Text/Pandoc/Options.hs
@@ -57,7 +57,7 @@ data Extension = Ext_footnotes
                | Ext_pipe_tables
                | Ext_citations
                | Ext_raw_tex
-               | Ext_tex_math
+               | Ext_tex_math_dollars
                | Ext_latex_macros
                | Ext_delimited_code_blocks
                | Ext_inline_code_attributes
@@ -93,7 +93,7 @@ pandocExtensions = Set.fromList
   , Ext_pipe_tables
   , Ext_citations
   , Ext_raw_tex
-  , Ext_tex_math
+  , Ext_tex_math_dollars
   , Ext_latex_macros
   , Ext_delimited_code_blocks
   , Ext_inline_code_attributes
diff --git a/src/Text/Pandoc/Readers/Markdown.hs b/src/Text/Pandoc/Readers/Markdown.hs
index 3e95ebbdf..1cabf70b5 100644
--- a/src/Text/Pandoc/Readers/Markdown.hs
+++ b/src/Text/Pandoc/Readers/Markdown.hs
@@ -1184,13 +1184,13 @@ math =  (return . B.displayMath <$> (mathDisplay >>= applyMacros'))
 
 mathDisplay :: Parser [Char] ParserState String
 mathDisplay = try $ do
-  guardEnabled Ext_tex_math
+  guardEnabled Ext_tex_math_dollars
   string "$$"
   many1Till (noneOf "\n" <|> (newline >>~ notFollowedBy' blankline)) (try $ string "$$")
 
 mathInline :: Parser [Char] ParserState String
 mathInline = try $ do
-  guardEnabled Ext_tex_math
+  guardEnabled Ext_tex_math_dollars
   char '$'
   notFollowedBy space
   words' <- sepBy1 mathWord (many1 (spaceChar <|> (newline >>~ notFollowedBy' blankline)))
-- 
cgit v1.2.3