diff options
Diffstat (limited to 'test/Tests/Lua.hs')
-rw-r--r-- | test/Tests/Lua.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/Tests/Lua.hs b/test/Tests/Lua.hs index bf9ddc2d5..853375327 100644 --- a/test/Tests/Lua.hs +++ b/test/Tests/Lua.hs @@ -179,7 +179,7 @@ tests = map (localOption (QuickCheckTests 20)) (doc $ para (str . T.pack $ "lua" </> "require-file.lua")) , testCase "Allow singleton inline in constructors" . runLuaTest $ do - Lua.liftIO . assertEqual "Not the exptected Emph" (Emph [Str "test"]) + Lua.liftIO . assertEqual "Not the expected Emph" (Emph [Str "test"]) =<< Lua.callFunc "pandoc.Emph" (Str "test") Lua.liftIO . assertEqual "Unexpected element" (Para [Str "test"]) =<< Lua.callFunc "pandoc.Para" ("test" :: String) |