From be46128d75ff8f2739b856dcc4ec41bebb90a666 Mon Sep 17 00:00:00 2001
From: Nicolas Noble <pixel@nobis-crew.org>
Date: Thu, 9 Sep 2010 10:47:04 -0700
Subject: Adding the SetRedraw() directive - only for Windows.

---
 iup/srclua3/iuplua_api.c | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'iup/srclua3')

diff --git a/iup/srclua3/iuplua_api.c b/iup/srclua3/iuplua_api.c
index a9acf1d..f9c6b30 100755
--- a/iup/srclua3/iuplua_api.c
+++ b/iup/srclua3/iuplua_api.c
@@ -269,6 +269,11 @@ static void Redraw(void)
   IupRedraw(iuplua_checkihandle(1), luaL_check_int(2));
 }
 
+static void SetRedraw(void)
+{
+  IupSetRedraw(iuplua_checkihandle(1), luaL_check_int(2));
+}
+
 static void VersionNumber(void)
 {
   lua_pushnumber(IupVersionNumber());
@@ -682,6 +687,7 @@ int iupluaapi_open(void)
     { "IupUpdate", Update },
     { "IupUpdateChildren", UpdateChildren },
     { "IupRedraw", Redraw },
+    { "IupSetRedraw", SetRedraw },
     { "IupVersionNumber", VersionNumber },
     { "IupShowXY", ShowXY },
     { "IupHide", Hide },
-- 
cgit v1.2.3