diff options
| author | Albert Krewinkel <[email protected]> | 2025-07-31 11:49:20 +0200 |
|---|---|---|
| committer | John MacFarlane <[email protected]> | 2025-08-01 10:04:14 -0700 |
| commit | 75aee7a23c96ff31aa9fcb7608891c33a011d6a1 (patch) | |
| tree | 155da93d4f6b5e262498aba353e6e92447fb2dc9 /pandoc-lua-engine/test/Tests/Lua.hs | |
| parent | 57e7d895db367eb09cb4cb31678ac3b5f6dc9ef7 (diff) | |
Lua: use proper interface functions to access the CommonState.
- The `PANDOC_STATE` is no longer a userdata object, but a table that
behaves like the old object.
- Log messages in `PANDOC_STATE.log` are now in temporal order.
Diffstat (limited to 'pandoc-lua-engine/test/Tests/Lua.hs')
| -rw-r--r-- | pandoc-lua-engine/test/Tests/Lua.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/pandoc-lua-engine/test/Tests/Lua.hs b/pandoc-lua-engine/test/Tests/Lua.hs index 990a1d039..82b815219 100644 --- a/pandoc-lua-engine/test/Tests/Lua.hs +++ b/pandoc-lua-engine/test/Tests/Lua.hs @@ -24,8 +24,7 @@ import Text.Pandoc.Builder (bulletList, definitionList, displayMath, divWith, linebreak, math, orderedList, para, plain, rawBlock, singleQuoted, space, str, strong, HasMeta (setMeta)) -import Text.Pandoc.Class ( CommonState (stVerbosity) - , modifyCommonState, runIOorExplode, setUserDataDir) +import Text.Pandoc.Class ( runIOorExplode, setUserDataDir, setVerbosity ) import Text.Pandoc.Definition (Attr, Block (BlockQuote, Div, Para), Pandoc, Inline (Emph, Str), pandocTypesVersion) import Text.Pandoc.Error (PandocError (PandocLuaError)) @@ -242,7 +241,7 @@ runLuaTest :: HasCallStack => Lua.LuaE PandocError a -> IO a runLuaTest op = runIOorExplode $ do -- Disable printing of warnings on stderr: some tests will generate -- warnings, we don't want to see those messages. - modifyCommonState $ \st -> st { stVerbosity = ERROR } + setVerbosity ERROR res <- runLua $ do setGlobals [ PANDOC_WRITER_OPTIONS def ] op |