From 576ddc1b99bdb09c5ba8dcc19360701b9119ae35 Mon Sep 17 00:00:00 2001
From: fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>
Date: Thu, 29 Nov 2007 08:09:17 +0000
Subject: Modified markdown reader for new Math block.

git-svn-id: https://pandoc.googlecode.com/svn/trunk@1115 788f1e2b-df1e-0410-8736-df70ead52e1b
---
 Text/Pandoc/Readers/Markdown.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Text')

diff --git a/Text/Pandoc/Readers/Markdown.hs b/Text/Pandoc/Readers/Markdown.hs
index ded9f2136..75b9ad134 100644
--- a/Text/Pandoc/Readers/Markdown.hs
+++ b/Text/Pandoc/Readers/Markdown.hs
@@ -704,7 +704,7 @@ math = try $ do
   notFollowedBy space
   words <- sepBy1 mathWord (many1 space)
   char '$'
-  return $ TeX ("$" ++ (joinWithSep " " words) ++ "$")
+  return $ Math $ joinWithSep " " words
 
 emph = ((enclosed (char '*') (char '*') inline) <|>
         (enclosed (char '_') (char '_' >> notFollowedBy alphaNum) inline)) >>= 
-- 
cgit v1.2.3