change in error message

This commit is contained in:
Roberto Ierusalimschy 2008-08-06 10:38:32 -03:00
parent ccd678ea3e
commit afe849c9b4
1 changed files with 2 additions and 3 deletions

View File

@ -1,5 +1,5 @@
/* /*
** $Id: loadlib.c,v 1.59 2007/12/12 14:36:12 roberto Exp roberto $ ** $Id: loadlib.c,v 1.60 2008/08/05 19:25:42 roberto Exp roberto $
** Dynamic library loader for Lua ** Dynamic library loader for Lua
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
** **
@ -524,8 +524,7 @@ static void setfenv (lua_State *L) {
if (lua_getstack(L, 1, &ar) == 0 || if (lua_getstack(L, 1, &ar) == 0 ||
lua_getinfo(L, "f", &ar) == 0 || /* get calling function */ lua_getinfo(L, "f", &ar) == 0 || /* get calling function */
lua_iscfunction(L, -1)) lua_iscfunction(L, -1))
luaL_error(L, "function " LUA_QL("module") luaL_error(L, LUA_QL("module") " not called from a Lua function");
" not called from a Lua function");
lua_pushvalue(L, -2); /* copy new environment table to top */ lua_pushvalue(L, -2); /* copy new environment table to top */
lua_setfenv(L, -2); lua_setfenv(L, -2);
lua_pop(L, 1); /* remove function */ lua_pop(L, 1); /* remove function */