data/pandoc.lua: cleanup code, remove cruft

1 files changed, 2 insertions, 2 deletions

diff --git a/test/Tests/Lua.hs b/test/Tests/Lua.hs
index 0f6619240..66dc2a6dd 100644
--- a/test/Tests/Lua.hs
+++ b/test/Tests/Lua.hs
@@ -120,7 +120,7 @@ tests = map (localOption (QuickCheckTests 20))
   , testCase "Pandoc types version is set" . runPandocLua' $ do
       let versionNums = versionBranch pandocTypesVersion
       Lua.getglobal "PANDOC_API_VERSION"
-      Lua.liftIO . assertEqual "pandoc version is wrong" versionNums
+      Lua.liftIO . assertEqual "pandoc-types version is wrong" versionNums
         =<< Lua.peek Lua.stackTop
   ]
 
@@ -145,7 +145,7 @@ roundtripEqual x = (x ==) <$> roundtripped
       error ("not exactly one additional element on the stack: " ++ show size)
     res <- Lua.peekEither (-1)
     case res of
-      Left _  -> error "could not read from stack"
+      Left e -> error (show e)
       Right y -> return y
 
 runPandocLua' :: Lua.Lua a -> IO a