@@ -179,7 +179,7 @@ tests = map (localOption (QuickCheckTests 20))
179179 (doc $ para (str . T.pack $ "lua" </> "require-file.lua"))
180180
181181 , testCase "Allow singleton inline in constructors" . runLuaTest $ do
182− Lua.liftIO . assertEqual "Not the exptected Emph" (Emph [Str "test"])
182+ Lua.liftIO . assertEqual "Not the expected Emph" (Emph [Str "test"])
183183 =<< Lua.callFunc "pandoc.Emph" (Str "test")
184184 Lua.liftIO . assertEqual "Unexpected element" (Para [Str "test"])
185185 =<< Lua.callFunc "pandoc.Para" ("test" :: String)