From 9e38925e829fd635f6f3339770f3ebdf49ad906f Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= Date: Thu, 3 Apr 2014 13:50:26 +0200 Subject: Add sdl_window:get_title/1 --- src/esdl2.erl | 4 ++++ src/sdl_window.erl | 5 +++++ 2 files changed, 9 insertions(+) (limited to 'src') diff --git a/src/esdl2.erl b/src/esdl2.erl index 352d0e9..9be4e55 100644 --- a/src/esdl2.erl +++ b/src/esdl2.erl @@ -82,6 +82,7 @@ -export([get_window_minimum_size/1]). -export([get_window_position/1]). -export([get_window_size/1]). +-export([get_window_title/1]). %% @todo We probably want to accept an env variable or somthing for the location. -on_load(on_load/0). @@ -257,3 +258,6 @@ get_window_position(_) -> get_window_size(_) -> erlang:nif_error({not_loaded, ?MODULE}). + +get_window_title(_) -> + erlang:nif_error({not_loaded, ?MODULE}). diff --git a/src/sdl_window.erl b/src/sdl_window.erl index dc265f1..82e2b17 100644 --- a/src/sdl_window.erl +++ b/src/sdl_window.erl @@ -25,6 +25,7 @@ -export([get_min_size/1]). -export([get_pos/1]). -export([get_size/1]). +-export([get_title/1]). create(Title, X, Y, W, H, Flags) -> esdl2:create_window(Title, X, Y, W, H, Flags), @@ -72,3 +73,7 @@ get_pos(Window) -> get_size(Window) -> esdl2:get_window_size(Window), receive {'_nif_thread_ret_', Ret} -> Ret end. + +get_title(Window) -> + esdl2:get_window_title(Window), + receive {'_nif_thread_ret_', Ret} -> Ret end. -- cgit v1.2.3