elua lib: add a func to retrieve the current translation lang

1 files changed, 20 insertions, 0 deletions

diff --git a/src/lib/elua/elua.c b/src/lib/elua/elua.c
index be85d94d71..3e1a715a98 100644
--- a/src/lib/elua/elua.c
+++ b/src/lib/elua/elua.c
@@ -258,9 +258,29 @@ _elua_gettext_bind_textdomain(lua_State *L)
 #endif
 }
 
+static int
+_elua_get_message_language(lua_State *L)
+{
+   const char *e;
+   e = getenv("LANGUAGE");
+   if (e && e[0]) goto success;
+   e = getenv("LC_ALL");
+   if (e && e[0]) goto success;
+   e = getenv("LC_MESSAGES");
+   if (e && e[0]) goto success;
+   e = getenv("LANG");
+   if (e && e[0]) goto success;
+   lua_pushnil(L);
+   return 1;
+success:
+   lua_pushstring(L, e);
+   return 1;
+};
+
 const luaL_reg gettextlib[] =
 {
    { "bind_textdomain", _elua_gettext_bind_textdomain },
+   { "get_message_language", _elua_get_message_language },
    { NULL, NULL }
 };