|
|
@@ -0,0 +1,26 @@
|
|
|
+--- a/src/lposix.c
|
|
|
++++ b/src/lposix.c
|
|
|
+@@ -727,11 +727,13 @@ static int Pctermid(lua_State *L) /** c
|
|
|
+ }
|
|
|
+
|
|
|
+
|
|
|
++#ifndef NO_GETLOGIN
|
|
|
+ static int Pgetlogin(lua_State *L) /** getlogin() */
|
|
|
+ {
|
|
|
+ lua_pushstring(L, getlogin());
|
|
|
+ return 1;
|
|
|
+ }
|
|
|
++#endif
|
|
|
+
|
|
|
+
|
|
|
+ static void Fgetpasswd(lua_State *L, int i, const void *data)
|
|
|
+@@ -1052,7 +1054,9 @@ static const luaL_reg R[] =
|
|
|
+ {"getcwd", Pgetcwd},
|
|
|
+ {"getenv", Pgetenv},
|
|
|
+ {"getgroup", Pgetgroup},
|
|
|
++#ifndef NO_GETLOGIN
|
|
|
+ {"getlogin", Pgetlogin},
|
|
|
++#endif
|
|
|
+ {"getpasswd", Pgetpasswd},
|
|
|
+ {"getpid", Pgetpid},
|
|
|
+ {"glob", Pglob},
|