git.iko.soy/typeable/pandoc
on master help sign in
Docx reader: remove now-unnecessary state variable.

This also introduces a `defaultDState` value.

commitcd9ca5a18a7b83e417a543221586384223d58a52 authorJesse Rosenthal <jrosenthal@jhu.edu> dateThu 24 Jul 2014, 10:51 (12 years ago) parentcdd7696
1 file changed+2−4
src/Text/Pandoc/Readers/Docx.hs+2−4
src/Text/Pandoc/Readers/Docx.hs+2−4
@@ -105,14 +105,12 @@ readDocx opts bytes =
105105
106106data DState = DState { docxAnchorMap :: M.Map String String
107107 , docxMediaBag :: MediaBag
108− , docxInHeaderBlock :: Bool
109− , docxInTexSubscript :: Bool }
108+ , docxInHeaderBlock :: Bool}
110109
111110defaultDState :: DState
112111defaultDState = DState { docxAnchorMap = M.empty
113112 , docxMediaBag = mempty
114− , docxInHeaderBlock = False
115− , docxInTexSubscript = False}
113+ , docxInHeaderBlock = False}
116114
117115data DEnv = DEnv { docxOptions :: ReaderOptions
118116 , docxDocument :: Docx}