diff options
| author | John MacFarlane <jgm@berkeley.edu> | 2019-11-14 05:46:56 -0800 |
|---|---|---|
| committer | John MacFarlane <jgm@berkeley.edu> | 2019-11-14 05:48:20 -0800 |
| commit | a1f69b1c7d6622a3bee678eb01ba36e94b99cd20 (patch) | |
| tree | 8aedaf5549458638df02460b045103fb4feb032d | |
| parent | e43c2e75a1284f464ce1ef9b3b6e12ea2b645f4a (diff) | |
| download | pandoc-a1f69b1c7d6622a3bee678eb01ba36e94b99cd20.tar.gz | |
Fix regression preventing header-includes from being set using -V.
See #5904.
| -rw-r--r-- | src/Text/Pandoc/App/OutputSettings.hs | 3 | ||||
| -rw-r--r-- | test/command/5904.md | 8 |
2 files changed, 10 insertions, 1 deletions
diff --git a/src/Text/Pandoc/App/OutputSettings.hs b/src/Text/Pandoc/App/OutputSettings.hs index d328a9b6a..77248cab1 100644 --- a/src/Text/Pandoc/App/OutputSettings.hs +++ b/src/Text/Pandoc/App/OutputSettings.hs @@ -117,7 +117,8 @@ optToOutputSettings opts = do let setVariableM k v = return . setVariable k v - let setListVariableM k vs = + let setListVariableM _ [] = return + setListVariableM k vs = return . Context . (M.insert (T.pack k) (toVal $ map T.pack vs)) . unContext diff --git a/test/command/5904.md b/test/command/5904.md new file mode 100644 index 000000000..fdc29407d --- /dev/null +++ b/test/command/5904.md @@ -0,0 +1,8 @@ +``` +% pandoc -s -t markdown -H test/B.txt --variable header-includes:foo +Hi +^D +foo + +Hi +``` |