Textile reader: Replace failIfStrict with guardEnabled.

This commit is contained in:
John MacFarlane 2012-07-26 22:21:00 -07:00
parent 14c911ba06
commit e797ab9136

View file

@ -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