diff options
Diffstat (limited to 'pandoc-lua-engine/test/Tests/Lua/Writer.hs')
| -rw-r--r-- | pandoc-lua-engine/test/Tests/Lua/Writer.hs | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/pandoc-lua-engine/test/Tests/Lua/Writer.hs b/pandoc-lua-engine/test/Tests/Lua/Writer.hs index 18274d124..c9a0d478c 100644 --- a/pandoc-lua-engine/test/Tests/Lua/Writer.hs +++ b/pandoc-lua-engine/test/Tests/Lua/Writer.hs @@ -51,11 +51,10 @@ tests = , goldenVsString "bytestring writer" "bytestring.bin" - (runIOorExplode $ do - txt <- writeCustom "bytestring.lua" >>= \case + (runIOorExplode $ + writeCustom "bytestring.lua" >>= \case (ByteStringWriter f, _, _) -> f def mempty - _ -> error "Expected a bytestring writer" - pure txt) + _ -> error "Expected a bytestring writer") , goldenVsString "template" "writer-template.out.txt" |