wx: fix type specifications

Author: kikofernandez

lib/wx/src/gen/wxWindow.erl

@@ -232,8 +232,10 @@ clientToScreen(#wx_ref{type=ThisT}=This,{PtX,PtY} = Pt)
   wxe_util:rec(?wxWindow_ClientToScreen_1).
 
 %% @doc See <a href="http://www.wxwidgets.org/manuals/2.8.12/wx_wxwindow.html#wxwindowclienttoscreen">external documentation</a>.
--spec clientToScreen(This, X, Y) -> {X::integer(), Y::integer()} when
-	This::wxWindow(), X::integer(), Y::integer().
+-spec clientToScreen(This, X, Y) -> {X, Y} when
+      This::wxWindow(),
+      X::integer(),
+      Y::integer().
 clientToScreen(#wx_ref{type=ThisT}=This,X,Y)
  when is_integer(X),is_integer(Y) ->
   ?CLASS(ThisT,wxWindow),

lib/wx/src/wx_object.erl

@@ -129,28 +129,35 @@
 
 %% -export([behaviour_info/1]).
 -callback init(Args :: term()) ->
-    {#wx_ref{}, State :: term()} | {#wx_ref{}, State :: term(), timeout() | 'hibernate'} |
-    {'stop', Reason :: term()} | 'ignore'.
+    {#wx_ref{}, State} | {#wx_ref{}, State, timeout() | 'hibernate'} |
+    {'stop', Reason :: term()} | 'ignore' when
+      State :: term().
 -callback handle_event(Request :: #wx{}, State :: term()) ->
-    {'noreply', NewState :: term()} |
-    {'noreply', NewState :: term(), timeout() | 'hibernate'} |
-    {'stop', Reason :: term(), NewState :: term()}.
+    {'noreply', NewState} |
+    {'noreply', NewState, timeout() | 'hibernate'} |
+    {'stop', Reason :: term(), NewState} when
+      NewState :: term().
 -callback handle_call(Request :: term(), From :: {pid(), Tag :: term()},
                       State :: term()) ->
-    {'reply', Reply :: term(), NewState :: term()} |
-    {'reply', Reply :: term(), NewState :: term(), timeout() | 'hibernate'} |
-    {'noreply', NewState :: term()} |
-    {'noreply', NewState :: term(), timeout() | 'hibernate'} |
-    {'stop', Reason :: term(), Reply :: term(), NewState :: term()} |
-    {'stop', Reason :: term(), NewState :: term()}.
+    {'reply', Reply, NewState} |
+    {'reply', Reply, NewState, timeout() | 'hibernate'} |
+    {'noreply', NewState} |
+    {'noreply', NewState, timeout() | 'hibernate'} |
+    {'stop', Reason, Reply, NewState} |
+    {'stop', Reason, NewState} when
+      Reason :: term(),
+      NewState :: term(),
+      Reply :: term().
 -callback handle_cast(Request :: term(), State :: term()) ->
-    {'noreply', NewState :: term()} |
-    {'noreply', NewState :: term(), timeout() | 'hibernate'} |
-    {'stop', Reason :: term(), NewState :: term()}.
+    {'noreply', NewState} |
+    {'noreply', NewState, timeout() | 'hibernate'} |
+    {'stop', Reason :: term(), NewState} when
+      NewState :: term().
 -callback handle_info(Info :: timeout() | term(), State :: term()) ->
-    {'noreply', NewState :: term()} |
-    {'noreply', NewState :: term(), timeout() | 'hibernate'} |
-    {'stop', Reason :: term(), NewState :: term()}.
+    {'noreply', NewState} |
+    {'noreply', NewState, timeout() | 'hibernate'} |
+    {'stop', Reason :: term(), NewState} when
+      NewState :: term().
 -callback handle_sync_event(Request :: #wx{}, Ref :: #wx_ref{}, State :: term()) ->
     ok.
 -callback terminate(Reason :: ('normal' | 'shutdown' | {'shutdown', term()} |