diff options
| author | Loïc Hoguin <[email protected]> | 2014-04-03 19:50:59 +0200 |
|---|---|---|
| committer | Loïc Hoguin <[email protected]> | 2014-04-03 19:50:59 +0200 |
| commit | a1afe564f1b5a3e8b91e3f706fbd5d7d66a9978c (patch) | |
| tree | 1b1e0e8662ab8fe8b8ad20b2ef456a0f71292483 /src | |
| parent | 89b594e3a86da6cc6d08009bfe0fb26a18ce8365 (diff) | |
| download | esdl2-a1afe564f1b5a3e8b91e3f706fbd5d7d66a9978c.tar.gz esdl2-a1afe564f1b5a3e8b91e3f706fbd5d7d66a9978c.tar.bz2 esdl2-a1afe564f1b5a3e8b91e3f706fbd5d7d66a9978c.zip | |
Add sdl_window:set_pos/3
Diffstat (limited to 'src')
| -rw-r--r-- | src/esdl2.erl | 4 | ||||
| -rw-r--r-- | src/sdl_window.erl | 4 |
2 files changed, 8 insertions, 0 deletions
diff --git a/src/esdl2.erl b/src/esdl2.erl index 8067c5f..c1e7651 100644 --- a/src/esdl2.erl +++ b/src/esdl2.erl @@ -95,6 +95,7 @@ -export([set_window_icon/2]). -export([set_window_maximum_size/3]). -export([set_window_minimum_size/3]). +-export([set_window_position/3]). %% @todo We probably want to accept an env variable or somthing for the location. -on_load(on_load/0). @@ -309,3 +310,6 @@ set_window_maximum_size(_, _, _) -> set_window_minimum_size(_, _, _) -> erlang:nif_error({not_loaded, ?MODULE}). + +set_window_position(_, _, _) -> + erlang:nif_error({not_loaded, ?MODULE}). diff --git a/src/sdl_window.erl b/src/sdl_window.erl index f3bdcf7..80e5376 100644 --- a/src/sdl_window.erl +++ b/src/sdl_window.erl @@ -38,6 +38,7 @@ -export([set_icon/2]). -export([set_max_size/3]). -export([set_min_size/3]). +-export([set_pos/3]). create(Title, X, Y, W, H, Flags) -> esdl2:create_window(Title, X, Y, W, H, Flags), @@ -128,3 +129,6 @@ set_max_size(Window, W, H) -> set_min_size(Window, W, H) -> esdl2:set_window_minimum_size(Window, W, H). + +set_pos(Window, X, Y) -> + esdl2:set_window_position(Window, X, Y). |