From cd9ca5a18a7b83e417a543221586384223d58a52 Mon Sep 17 00:00:00 2001 From: Jesse Rosenthal Date: Thu, 24 Jul 2014 10:51:13 -0400 Subject: Docx reader: remove now-unnecessary state variable. This also introduces a `defaultDState` value. --- src/Text/Pandoc/Readers/Docx.hs | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'src/Text') diff --git a/src/Text/Pandoc/Readers/Docx.hs b/src/Text/Pandoc/Readers/Docx.hs index 513283005..6a33b6ea3 100644 --- a/src/Text/Pandoc/Readers/Docx.hs +++ b/src/Text/Pandoc/Readers/Docx.hs @@ -105,14 +105,12 @@ readDocx opts bytes = data DState = DState { docxAnchorMap :: M.Map String String , docxMediaBag :: MediaBag - , docxInHeaderBlock :: Bool - , docxInTexSubscript :: Bool } + , docxInHeaderBlock :: Bool} defaultDState :: DState defaultDState = DState { docxAnchorMap = M.empty , docxMediaBag = mempty - , docxInHeaderBlock = False - , docxInTexSubscript = False} + , docxInHeaderBlock = False} data DEnv = DEnv { docxOptions :: ReaderOptions , docxDocument :: Docx} -- cgit v1.2.3