- // Call with 5 arguments, 0 results
- if (lua_pcall(L, 5, 0, m_errorhandler))
- scriptError();
- lua_pop(L, 1); // Pop object
+ lua_pushnumber(L, damage);
+
+ setOriginFromTable(object);
+ PCALL_RES(lua_pcall(L, 6, 1, error_handler));
+
+ bool retval = lua_toboolean(L, -1);
+ lua_pop(L, 2); // Pop object and error handler
+ return retval;