diff options
| -rw-r--r-- | c_src/sdl_clipboard.c | 5 | ||||
| -rw-r--r-- | src/sdl_clipboard.erl | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/c_src/sdl_clipboard.c b/c_src/sdl_clipboard.c index 2ecc485..4ddaaa2 100644 --- a/c_src/sdl_clipboard.c +++ b/c_src/sdl_clipboard.c @@ -30,7 +30,10 @@ NIF_FUNCTION(get_clipboard_text) SDL_free(text); - return term; + return enif_make_tuple2(env, + atom_ok, + term + ); } // has_clipboard_text diff --git a/src/sdl_clipboard.erl b/src/sdl_clipboard.erl index 4ac3c9a..2d2bda1 100644 --- a/src/sdl_clipboard.erl +++ b/src/sdl_clipboard.erl @@ -18,11 +18,14 @@ -export([has_text/0]). -export([set_text/1]). +-spec get_text() -> {ok, string()} | sdl:error(). get_text() -> esdl2:get_clipboard_text(). +-spec has_text() -> boolean(). has_text() -> esdl2:has_clipboard_text(). +-spec set_text(string()) -> ok | sdl:error(). set_text(Text) -> esdl2:set_clipboard_text(Text). |