diff options
| -rw-r--r-- | src/Text/Pandoc/Readers/LaTeX.hs | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/src/Text/Pandoc/Readers/LaTeX.hs b/src/Text/Pandoc/Readers/LaTeX.hs index dd94c0ac1..8c3dac263 100644 --- a/src/Text/Pandoc/Readers/LaTeX.hs +++ b/src/Text/Pandoc/Readers/LaTeX.hs @@ -43,7 +43,6 @@ import Text.Pandoc.Parsing hiding ((<|>), many, optional, space, import qualified Text.Pandoc.UTF8 as UTF8 import Data.Char ( chr, ord ) import Control.Monad -import Data.Default import Text.Pandoc.Builder import Data.Char (isLetter, isAlphaNum) import Control.Applicative @@ -72,23 +71,6 @@ parseLaTeX = do let (Pandoc _ bs') = doc bs return $ Pandoc meta bs' -data LPState = LPState{ - lpMeta :: Meta - , lpOptions :: ReaderOptions - , lpHasChapters :: Bool - , lpParserContext :: ParserContext - , lpQuoteContext :: QuoteContext - } deriving Show - -instance Default LPState where - def = LPState{ - lpMeta = nullMeta - , lpOptions = def - , lpHasChapters = False - , lpParserContext = NullState - , lpQuoteContext = NoQuote - } - type LP = Parser [Char] ParserState anyControlSeq :: LP String |