Docx reader: remove now-unnecessary state variable.
This also introduces a `defaultDState` value.
This commit is contained in:
parent
cdd769624f
commit
cd9ca5a18a
1 changed files with 2 additions and 4 deletions
|
@ -105,14 +105,12 @@ readDocx opts bytes =
|
||||||
|
|
||||||
data DState = DState { docxAnchorMap :: M.Map String String
|
data DState = DState { docxAnchorMap :: M.Map String String
|
||||||
, docxMediaBag :: MediaBag
|
, docxMediaBag :: MediaBag
|
||||||
, docxInHeaderBlock :: Bool
|
, docxInHeaderBlock :: Bool}
|
||||||
, docxInTexSubscript :: Bool }
|
|
||||||
|
|
||||||
defaultDState :: DState
|
defaultDState :: DState
|
||||||
defaultDState = DState { docxAnchorMap = M.empty
|
defaultDState = DState { docxAnchorMap = M.empty
|
||||||
, docxMediaBag = mempty
|
, docxMediaBag = mempty
|
||||||
, docxInHeaderBlock = False
|
, docxInHeaderBlock = False}
|
||||||
, docxInTexSubscript = False}
|
|
||||||
|
|
||||||
data DEnv = DEnv { docxOptions :: ReaderOptions
|
data DEnv = DEnv { docxOptions :: ReaderOptions
|
||||||
, docxDocument :: Docx}
|
, docxDocument :: Docx}
|
||||||
|
|
Loading…
Add table
Reference in a new issue