--- 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;
--- a/hedgewars/uWorld.pas Sat May 05 15:17:16 2012 +0100
+++ b/hedgewars/uWorld.pas Sat May 05 16:38:41 2012 +0200
@@ -36,7 +36,7 @@
procedure ShakeCamera(amount: LongInt);
procedure InitCameraBorders;
procedure InitTouchInterface;
-procedure SetUtilityWidgetState(ammoType: TAmmoType);
+procedure SetUtilityWidgetState(ammoType: TAmmoType = amNothing);
procedure animateWidget(widget: POnScreenWidget; fade, showWidget: boolean);
procedure MoveCamera;
procedure onFocusStateChanged;