From 8ee7b5dd33119f6a762b56735bdecce0ec165961 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= <essen@ninenines.eu>
Date: Thu, 3 Apr 2014 18:50:37 +0200
Subject: Add sdl_window:grab_input/2

---
 src/esdl2.erl      | 4 ++++
 src/sdl_window.erl | 4 ++++
 2 files changed, 8 insertions(+)

(limited to 'src')

diff --git a/src/esdl2.erl b/src/esdl2.erl
index 144e8dd..4abc20b 100644
--- a/src/esdl2.erl
+++ b/src/esdl2.erl
@@ -91,6 +91,7 @@
 -export([set_window_bordered/2]).
 -export([set_window_brightness/2]).
 -export([set_window_fullscreen/2]).
+-export([set_window_grab/2]).
 
 %% @todo We probably want to accept an env variable or somthing for the location.
 -on_load(on_load/0).
@@ -293,3 +294,6 @@ set_window_brightness(_, _) ->
 
 set_window_fullscreen(_, _) ->
 	erlang:nif_error({not_loaded, ?MODULE}).
+
+set_window_grab(_, _) ->
+	erlang:nif_error({not_loaded, ?MODULE}).
diff --git a/src/sdl_window.erl b/src/sdl_window.erl
index f675f26..0da1e57 100644
--- a/src/sdl_window.erl
+++ b/src/sdl_window.erl
@@ -34,6 +34,7 @@
 -export([set_bordered/2]).
 -export([set_brightness/2]).
 -export([set_fullscreen/2]).
+-export([grab_input/2]).
 
 create(Title, X, Y, W, H, Flags) ->
 	esdl2:create_window(Title, X, Y, W, H, Flags),
@@ -111,3 +112,6 @@ set_brightness(Window, Brightness) ->
 set_fullscreen(Window, Flag) ->
 	esdl2:set_window_fullscreen(Window, Flag),
 	receive {'_nif_thread_ret_', Ret} -> Ret end.
+
+grab_input(Window, Grab) ->
+	esdl2:set_window_grab(Window, Grab).
-- 
cgit v1.2.3