diff options
author | John MacFarlane <jgm@berkeley.edu> | 2019-10-08 09:22:46 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2019-10-09 11:01:33 -0700 |
commit | aceee9ca48484c300ac3519fb7991e3d22768312 (patch) | |
tree | 5beaccc4860fd5a9525514d2fe9e737e42703f73 /test/Tests | |
parent | 1b10b5cea947cd6567c33466006c4216fde9f107 (diff) | |
download | pandoc-aceee9ca48484c300ac3519fb7991e3d22768312.tar.gz |
Options.WriterOptions: Change type of writerVariables to Context Text.
This will allow structured values.
[API change]
Diffstat (limited to 'test/Tests')
-rw-r--r-- | test/Tests/Writers/Powerpoint.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/test/Tests/Writers/Powerpoint.hs b/test/Tests/Writers/Powerpoint.hs index e3f4173bd..be98fe0e7 100644 --- a/test/Tests/Writers/Powerpoint.hs +++ b/test/Tests/Writers/Powerpoint.hs @@ -6,6 +6,9 @@ import Tests.Writers.OOXML (ooxmlTest) import Text.Pandoc import Test.Tasty import System.FilePath +import Text.DocTemplates (ToContext(toVal), Context(..)) +import qualified Data.Map as M +import Data.Text (pack) -- templating is important enough, and can break enough things, that -- we want to run all our tests with both default formatting and a @@ -124,7 +127,8 @@ tests = groupPptxTests [ pptxTests "Inline formatting" "pptx/code.native" "pptx/code.pptx" , pptxTests "inline code and code blocks, custom formatting" - def { writerVariables = [("monofont", "Consolas")] } + def { writerVariables = Context $ M.fromList + [(pack "monofont", toVal $ pack "Consolas")] } "pptx/code.native" "pptx/code-custom.pptx" ] |