summaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/Parsing.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2014-03-25 22:44:16 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2014-03-25 22:44:16 -0700
commit0934c4430a91551f8d293fa7eb6a2c3e745d3a48 (patch)
treeb87334989dad80114019cedb6d1c6d477a526f67 /src/Text/Pandoc/Parsing.hs
parent994597f071cddbf9631e0d27bc8441afd2b1ebeb (diff)
Parsing: Added stateCaption.
This is primarily for use in the LaTeX reader, so far.
Diffstat (limited to 'src/Text/Pandoc/Parsing.hs')
-rw-r--r--src/Text/Pandoc/Parsing.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Text/Pandoc/Parsing.hs b/src/Text/Pandoc/Parsing.hs
index d8c7e71d5..68d4605ee 100644
--- a/src/Text/Pandoc/Parsing.hs
+++ b/src/Text/Pandoc/Parsing.hs
@@ -857,7 +857,7 @@ data ParserState = ParserState
-- Triple represents: 1) Base role, 2) Optional format (only for :raw:
-- roles), 3) Source language annotation for code (could be used to
-- annotate role classes too).
-
+ stateCaption :: Maybe Inlines, -- ^ Caption in current environment
stateWarnings :: [String] -- ^ Warnings generated by the parser
}
@@ -927,6 +927,7 @@ defaultParserState =
stateMacros = [],
stateRstDefaultRole = "title-reference",
stateRstCustomRoles = M.empty,
+ stateCaption = Nothing,
stateWarnings = []}
-- | Succeed only if the extension is enabled.