--- 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},