Kill spend window

src/gd_m_spend.erl

@@ -176,8 +176,7 @@ handle_info({focus, Element}, State) ->
     ok = focus(Element, State),
     {noreply, State};
 handle_info({enter, affirm}, State) ->
-    NewState = check(State),
-    {noreply, NewState};
+    check(State);
 handle_info({enter, cancel}, State) ->
     cancel(State);
 handle_info(esc, State) ->
@@ -234,6 +233,7 @@ check(State =#s{frame  = Frame,  caller    = Caller,   j = J,
     ok =
     case clean_spend(DirtyTX, #spend_tx{}, J, []) of
         {ok, CleanTX} ->
+            ok = wxFrame:destroy(Frame),
             zxw_modal:done(Caller, {ok, CleanTX});
         {error, Errors} ->
             DerpyDerpDerp = form_message(Errors, J),