hedgewars/uTouch.pas
changeset 7022 107651b3c5a0
parent 6962 ec308eabe09b
child 7063 a0326412e96a
--- a/hedgewars/uTouch.pas	Sat May 05 15:17:16 2012 +0100
+++ b/hedgewars/uTouch.pas	Sat May 05 16:38:41 2012 +0200
@@ -239,8 +239,8 @@
 if aimingCrosshair then
     begin
     aimingCrosshair:= false;
-    upKey:= false;
-    downKey:= false;
+    ParseTeamCommand('-up');
+    ParseTeamCommand('-down');
     dec(buttonsDown);
     end;
 
@@ -418,7 +418,7 @@
 begin
 targetted:= false;
 targetting:= false;
-SetUtilityWidgetState;
+SetUtilityWidgetState(amNothing);
 end;