hedgewars/uTouch.pas
changeset 6707 07c8704b6b08
parent 6705 d2e95dcf2bb0
child 6712 c582869fbe7f
--- a/hedgewars/uTouch.pas	Fri Feb 17 20:42:22 2012 -0500
+++ b/hedgewars/uTouch.pas	Sat Feb 18 11:18:10 2012 +0100
@@ -215,6 +215,7 @@
     finger: PTouch_Data;
     widget: POnScreenWidget;
 begin
+{$IFDEF USE_TOUCH_INTERFACE}
 x := x;
 y := y;
 finger:= updateFinger(x,y,0,0,pointerId);
@@ -259,6 +260,7 @@
     end;
  
 deleteFinger(pointerId);
+{$ENDIF}
 end;
 
 procedure onTouchDoubleClick(finger: TTouch_Data);