From e797ab9136115caab3d162162bf9d231afc514a0 Mon Sep 17 00:00:00 2001
From: John MacFarlane <fiddlosopher@gmail.com>
Date: Thu, 26 Jul 2012 22:21:00 -0700
Subject: Textile reader:  Replace failIfStrict with guardEnabled.

---
 src/Text/Pandoc/Readers/Textile.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'src/Text/Pandoc/Readers')

diff --git a/src/Text/Pandoc/Readers/Textile.hs b/src/Text/Pandoc/Readers/Textile.hs
index 65aa144c2..6e5ab2791 100644
--- a/src/Text/Pandoc/Readers/Textile.hs
+++ b/src/Text/Pandoc/Readers/Textile.hs
@@ -273,7 +273,7 @@ rawHtmlBlock = try $ do
 -- | Raw block of LaTeX content
 rawLaTeXBlock' :: Parser [Char] ParserState Block
 rawLaTeXBlock' = do
-  failIfStrict
+  guardEnabled Ext_raw_tex
   RawBlock "latex" <$> (rawLaTeXBlock <* spaces)
 
 
@@ -464,11 +464,11 @@ endline = try $ do
 
 rawHtmlInline :: Parser [Char] ParserState Inline
 rawHtmlInline = RawInline "html" . snd <$> htmlTag isInlineTag
-                
+
 -- | Raw LaTeX Inline 
 rawLaTeXInline' :: Parser [Char] ParserState Inline
 rawLaTeXInline' = try $ do
-  failIfStrict
+  guardEnabled Ext_raw_tex
   rawLaTeXInline
 
 -- | Textile standard link syntax is "label":target. But we
-- 
cgit v1.2.3