From f7fc13becdb78df9c51c5039ffd2d7cdeeedd64e Mon Sep 17 00:00:00 2001
From: Stefan Seyfried <seife@tuxbox-git.slipkontur.de>
Date: Fri, 22 Mar 2013 22:22:21 +0100
Subject: [PATCH] luainstance: export FontHeight to Lua scripts

---
 src/gui/luainstance.cpp | 16 ++++++++++++++++
 src/gui/luainstance.h   |  1 +
 2 files changed, 17 insertions(+)

diff --git a/src/gui/luainstance.cpp b/src/gui/luainstance.cpp
index 6b7be3d49..30bdbf6e0 100644
--- a/src/gui/luainstance.cpp
+++ b/src/gui/luainstance.cpp
@@ -262,6 +262,7 @@ const luaL_Reg CLuaInstance::methods[] =
 	{ "RenderString", CLuaInstance::RenderString },
 	{ "PaintIcon", CLuaInstance::PaintIcon },
 	{ "GetInput", CLuaInstance::GetInput },
+	{ "FontHeight", CLuaInstance::FontHeight },
 	{ NULL, NULL }
 };
 
@@ -439,6 +440,21 @@ int CLuaInstance::GetInput(lua_State *L)
 	return 2;
 }
 
+int CLuaInstance::FontHeight(lua_State *L)
+{
+	int f;
+	DBG("CLuaInstance::%s %d\n", __func__, lua_gettop(L));
+
+	CLuaData *W = CheckData(L, 1);
+	if (!W)
+		return 0;
+	f = luaL_checkint(L, 2);	/* font number, use FONT['xxx'] for FONT_TYPE_xxx in the script */
+	if (f >= FONT_TYPE_COUNT || f < 0)
+		f = SNeutrinoSettings::FONT_TYPE_MENU;
+	lua_pushinteger(L, (int)g_Font[f]->getHeight());
+	return 1;
+}
+
 int CLuaInstance::GCWindow(lua_State *L)
 {
 	DBG("CLuaInstance::%s %d\n", __func__, lua_gettop(L));
diff --git a/src/gui/luainstance.h b/src/gui/luainstance.h
index 24cb73123..fe1a250ff 100644
--- a/src/gui/luainstance.h
+++ b/src/gui/luainstance.h
@@ -53,6 +53,7 @@ private:
 	static int PaintBox(lua_State *L);
 	static int PaintIcon(lua_State *L);
 	static int RenderString(lua_State *L);
+	static int FontHeight(lua_State *L);
 	static int GetInput(lua_State *L);
 	static int GCWindow(lua_State *L);
 };