aboutsummaryrefslogtreecommitdiff
path: root/src/Text/Pandoc/App.hs
diff options
context:
space:
mode:
authorRoland Hieber <rohieb@rohieb.name>2017-02-25 23:15:56 +0100
committerJohn MacFarlane <jgm@berkeley.edu>2017-02-25 23:15:56 +0100
commit699d289cc5913c3cb0ec7b1b3d7ae767cbe55339 (patch)
tree779fbbdf3b2ecda1e864225ec8e058b8b158a4b1 /src/Text/Pandoc/App.hs
parent9ab30c6495897ca02c873897bf7f4be66687d8b2 (diff)
downloadpandoc-699d289cc5913c3cb0ec7b1b3d7ae767cbe55339.tar.gz
Add `sourcefile` and `outputfile` template variables (#3439)
Closes #3431.
Diffstat (limited to 'src/Text/Pandoc/App.hs')
-rw-r--r--src/Text/Pandoc/App.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/Text/Pandoc/App.hs b/src/Text/Pandoc/App.hs
index 1a41050d7..9d8fc592b 100644
--- a/src/Text/Pandoc/App.hs
+++ b/src/Text/Pandoc/App.hs
@@ -230,6 +230,11 @@ convertWithOpts opts = do
variables <- return (optVariables opts)
>>=
+ (\vars -> return $ ("outputfile", optOutputFile opts) : vars)
+ >>=
+ withList (addStringAsVariable "sourcefile")
+ (optInputFiles opts)
+ >>=
withList (addContentsAsVariable "include-before")
(optIncludeBeforeBody opts)
>>=