diff -r 54faf3034720 -r c9e873cf2b08 hedgewars/uTouch.pas --- a/hedgewars/uTouch.pas Sat Feb 18 19:33:48 2012 +0100 +++ b/hedgewars/uTouch.pas Sun Feb 19 00:25:38 2012 +0100 @@ -254,6 +254,7 @@ procedure onTouchLongClick(finger: TTouch_Data); begin +{$IFDEF USE_TOUCH_INTERFACE} if isOnRect(jumpWidget.active, finger) then begin ParseCommand('ljump', (CurrentTeam <> nil) and not(CurrentTeam^.ExtDriven) and (CurrentHedgehog^.BotLevel=0)); @@ -261,6 +262,7 @@ ParseCommand('gencmd R', true); exit; end; +{$ENDIF} end; procedure onTouchClick(finger: TTouch_Data); @@ -289,7 +291,7 @@ exit; end; - +{$IFDEF USE_TOUCH_INTERFACE} if isOnCurrentHog(finger) or isOnRect(AMWidget.active, finger) then begin bShowAmmoMenu := true; @@ -303,6 +305,7 @@ ParseCommand('gencmd R', true); exit; end; +{$ENDIF} end; function addFinger(x,y: Longword; id: TSDL_FingerId): PTouch_Data;