src/gd_con.erl

@@ -859,7 +859,7 @@ do_spend(#spend_tx{sender_id    = SenderID,
                                Nonce,
                                Payload,
                                NetworkID),
-            tell(info, "Outcome: ~p", [Outcome]);
+            tell(info, "SpendTX Outcome: ~p", [Outcome]);
         false ->
             log(warning, "Tried do_spend with a bad key: ~p", [SenderID])
     end.

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),