diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/Tests/Lua.hs | 6 | ||||
| -rw-r--r-- | test/lua/script-name.lua | 3 |
2 files changed, 9 insertions, 0 deletions
diff --git a/test/Tests/Lua.hs b/test/Tests/Lua.hs index b25a6fa4a..b42fda9c8 100644 --- a/test/Tests/Lua.hs +++ b/test/Tests/Lua.hs @@ -111,6 +111,12 @@ tests = map (localOption (QuickCheckTests 20)) , plain (str "to_roman_numeral: OK") ]) + , testCase "Script filename is set" $ + assertFilterConversion "unexpected script name" + "script-name.lua" + (doc $ para "ignored") + (doc $ para "lua/script-name.lua") + , testCase "Pandoc version is set" . runPandocLua' $ do Lua.getglobal' "table.concat" Lua.getglobal "PANDOC_VERSION" diff --git a/test/lua/script-name.lua b/test/lua/script-name.lua new file mode 100644 index 000000000..4b5a223f0 --- /dev/null +++ b/test/lua/script-name.lua @@ -0,0 +1,3 @@ +function Para (_) + return pandoc.Para{pandoc.Str(PANDOC_SCRIPT_FILE)} +end |