aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Parsing.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Text/Pandoc/Parsing.hs')
-rw-r--r--src/Text/Pandoc/Parsing.hs5
1 files changed, 0 insertions, 5 deletions
diff --git a/src/Text/Pandoc/Parsing.hs b/src/Text/Pandoc/Parsing.hs
index ab35892dc..16eee6de5 100644
--- a/src/Text/Pandoc/Parsing.hs
+++ b/src/Text/Pandoc/Parsing.hs
@@ -48,7 +48,6 @@ module Text.Pandoc.Parsing ( (>>~),
withHorizDisplacement,
withRaw,
nullBlock,
- failIfStrict,
failUnlessLHS,
escaped,
characterReference,
@@ -392,10 +391,6 @@ withRaw parser = do
nullBlock :: Parsec [Char] st Block
nullBlock = anyChar >> return Null
--- | Fail if reader is in strict markdown syntax mode.
-failIfStrict :: Parsec [a] ParserState ()
-failIfStrict = getOption readerStrict >>= guard . not
-
-- | Fail unless we're in literate haskell mode.
failUnlessLHS :: Parsec [tok] ParserState ()
failUnlessLHS = getOption readerLiterateHaskell >>= guard