1 files changed, 14 insertions, 0 deletions

diff --git a/src/compat.c b/src/compat.c
index 9f36090..bccd05f 100644
--- a/src/compat.c
+++ b/src/compat.c
@@ -59,6 +59,20 @@ int lua_getiuservalue( lua_State* L, int idx, int n)
                 return LUA_TNONE;
         }
         lua_getuservalue( L, idx);
+
+#if LUA_VERSION_NUM == 501
+        /* default environment is not a nil (see lua_getfenv) */
+        lua_getglobal(L, "package");
+        if (lua_rawequal(L, -2, -1) || lua_rawequal(L, -2, LUA_GLOBALSINDEX))
+        {
+                lua_pop(L, 2);
+                lua_pushnil( L);
+
+                return LUA_TNONE;
+        }
+        lua_pop(L, 1);  /* remove package */
+#endif
+
         return lua_type( L, -1);
 }