diff options
| -rw-r--r-- | src/Text/Pandoc/Readers/Textile.hs | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/src/Text/Pandoc/Readers/Textile.hs b/src/Text/Pandoc/Readers/Textile.hs index 9191f6908..d4f092d07 100644 --- a/src/Text/Pandoc/Readers/Textile.hs +++ b/src/Text/Pandoc/Readers/Textile.hs @@ -56,7 +56,6 @@ import Text.Pandoc.Shared import Text.Pandoc.Options import Text.Pandoc.Parsing import Text.Pandoc.Readers.HTML ( htmlTag, isInlineTag, isBlockTag ) -import Text.Pandoc.Readers.LaTeX ( rawLaTeXInline, rawLaTeXBlock ) import Text.HTML.TagSoup (parseTags, innerText, fromAttrib, Tag(..)) import Text.HTML.TagSoup.Match import Data.List ( intercalate ) @@ -126,7 +125,6 @@ blockParsers = [ codeBlock , commentBlock , anyList , rawHtmlBlock - , rawLaTeXBlock' , maybeExplicitBlock "table" table , maybeExplicitBlock "p" para ] @@ -292,13 +290,6 @@ rawHtmlBlock = try $ do optional blanklines return $ RawBlock "html" b --- | Raw block of LaTeX content -rawLaTeXBlock' :: Parser [Char] ParserState Block -rawLaTeXBlock' = do - guardEnabled Ext_raw_tex - RawBlock "latex" <$> (rawLaTeXBlock <* spaces) - - -- | In textile, paragraphs are separated by blank lines. para :: Parser [Char] ParserState Block para = try $ Para . normalizeSpaces <$> manyTill inline blockBreak @@ -373,7 +364,6 @@ inlineParsers = [ str , escapedInline , htmlSpan , rawHtmlInline - , rawLaTeXInline' , note , try $ (char '[' *> inlineMarkup <* char ']') , inlineMarkup @@ -489,12 +479,6 @@ 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 - guardEnabled Ext_raw_tex - rawLaTeXInline - -- | Textile standard link syntax is "label":target. But we -- can also have ["label":target]. link :: Parser [Char] ParserState Inline |