diff -r c582869fbe7f -r f2f93017132c hedgewars/uTouch.pas --- a/hedgewars/uTouch.pas Sat Feb 18 15:24:20 2012 +0100 +++ b/hedgewars/uTouch.pas Sat Feb 18 16:56:04 2012 +0100 @@ -141,7 +141,7 @@ finger^.pressedWidget:= @pauseButton; exit; end; - + dec(buttonsDown);//no buttonsDown, undo the inc() above if buttonsDown = 0 then begin @@ -254,7 +254,7 @@ procedure onTouchLongClick(finger: TTouch_Data); begin -if isOnRect(backjump.active, finger) then +if isOnRect(jumpWidget.active, finger) then begin ParseCommand('ljump', (CurrentTeam <> nil) and not(CurrentTeam^.ExtDriven) and (CurrentHedgehog^.BotLevel=0)); if (CurrentTeam <> nil) and (not CurrentTeam^.ExtDriven) and (ReadyTimeLeft > 1) then @@ -290,13 +290,13 @@ end; -if isOnCurrentHog(finger) then +if isOnCurrentHog(finger) or isOnRect(AMWidget.active, finger) then begin bShowAmmoMenu := true; exit; end; -if isOnRect(backjump.active, finger) then +if isOnRect(jumpWidget.active, finger) then begin ParseCommand('hjump', (CurrentTeam <> nil) and not(CurrentTeam^.ExtDriven) and (CurrentHedgehog^.BotLevel=0)); if (CurrentTeam <> nil) and (not CurrentTeam^.ExtDriven) and (ReadyTimeLeft > 1) then