61d2b1d248e3986d0375b0e27590dabbbc5d7d69
[openwrt/openwrt.git] / package / lua / patches / 500-eglibc_config.patch
1 --- a/src/lposix.c
2 +++ b/src/lposix.c
3 @@ -727,11 +727,13 @@ static int Pctermid(lua_State *L) /** c
4 }
5
6
7 +#ifndef NO_GETLOGIN
8 static int Pgetlogin(lua_State *L) /** getlogin() */
9 {
10 lua_pushstring(L, getlogin());
11 return 1;
12 }
13 +#endif
14
15
16 static void Fgetpasswd(lua_State *L, int i, const void *data)
17 @@ -1052,7 +1054,9 @@ static const luaL_reg R[] =
18 {"getcwd", Pgetcwd},
19 {"getenv", Pgetenv},
20 {"getgroup", Pgetgroup},
21 +#ifndef NO_GETLOGIN
22 {"getlogin", Pgetlogin},
23 +#endif
24 {"getpasswd", Pgetpasswd},
25 {"getpid", Pgetpid},
26 {"glob", Pglob},