aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc
diff options
context:
space:
mode:
authorJesse Rosenthal <jrosenthal@jhu.edu>2014-07-24 10:51:13 -0400
committerJesse Rosenthal <jrosenthal@jhu.edu>2014-08-06 11:20:41 -0400
commitcd9ca5a18a7b83e417a543221586384223d58a52 (patch)
tree56fd4ce8be77cb38d66f63db6a08d64974031180 /src/Text/Pandoc
parentcdd769624f4c5d35207126d11a278d8bc2c48106 (diff)
downloadpandoc-cd9ca5a18a7b83e417a543221586384223d58a52.tar.gz
Docx reader: remove now-unnecessary state variable.
This also introduces a `defaultDState` value.
Diffstat (limited to 'src/Text/Pandoc')
-rw-r--r--src/Text/Pandoc/Readers/Docx.hs6
1 files changed, 2 insertions, 4 deletions
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}