aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/App/Opt.hs
diff options
context:
space:
mode:
authorJohn MacFarlane <jgm@berkeley.edu>2020-10-29 15:54:50 -0700
committerJohn MacFarlane <jgm@berkeley.edu>2020-10-29 15:54:50 -0700
commitbc3f16b0c18e0f04a3e9d3e162f57f8e86cadead (patch)
tree74356f7acc9dea1fbeb6eac32e999b87e23066e1 /src/Text/Pandoc/App/Opt.hs
parentbd7c9eb32be7c5499f4a50cb4b5f138f9eb919e8 (diff)
downloadpandoc-bc3f16b0c18e0f04a3e9d3e162f57f8e86cadead.tar.gz
Allow citation-abbreviations in defaults file.
Diffstat (limited to 'src/Text/Pandoc/App/Opt.hs')
-rw-r--r--src/Text/Pandoc/App/Opt.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/Text/Pandoc/App/Opt.hs b/src/Text/Pandoc/App/Opt.hs
index 3da6a936b..64c61fb74 100644
--- a/src/Text/Pandoc/App/Opt.hs
+++ b/src/Text/Pandoc/App/Opt.hs
@@ -367,6 +367,11 @@ doOpt (k',v) = do
foldr addItem o xs)
<|>
(parseYAML v >>= \(x :: Text) -> return $ \o -> addItem x o)
+ "citation-abbreviations" ->
+ parseYAML v >>= \x ->
+ return (\o -> o{ optMetadata =
+ addMeta "citation-abbreviations" (T.unpack x)
+ (optMetadata o) })
"ipynb-output" ->
parseYAML v >>= \x -> return (\o -> o{ optIpynbOutput = x })
"include-before-body" ->