# HG changeset patch
# User Wuzzy <Wuzzy2@mail.ru>
# Date 1543268907 -3600
# Node ID 575baea4108bde71591e1cf31c7a0034e98321f6
# Parent  055eae9334827dbf8b01418ab1fc5c9dac077b1e
Remove dead code in uTouch

diff -r 055eae933482 -r 575baea4108b hedgewars/uTouch.pas
--- a/hedgewars/uTouch.pas	Mon Nov 26 21:13:49 2018 +0100
+++ b/hedgewars/uTouch.pas	Mon Nov 26 22:48:27 2018 +0100
@@ -74,9 +74,6 @@
     moveCursor : boolean;
     invertCursor : boolean;
 
-    xTouchClick,yTouchClick : LongInt;
-    timeSinceClick : Longword;
-
     //Pinch to zoom
     pinchSize : LongInt;
     baseZoomValue: GLFloat;
@@ -317,16 +314,6 @@
 
 procedure onTouchClick(finger: TTouch_Data);
 begin
-//if (RealTicks - timeSinceClick < 300) and (sqrt(sqr(finger.X-xTouchClick) + sqr(finger.Y-yTouchClick)) < 30) then
-//    begin
-//    onTouchDoubleClick(finger);
-//    timeSinceClick:= 0;//we make an assumption there won't be an 'click' in the first 300 ticks(milliseconds)
-//    exit;
-//    end;
-
-xTouchClick:= finger.x;
-yTouchClick:= finger.y;
-timeSinceClick:= RealTicks;
 
 if bShowAmmoMenu then
     begin
@@ -637,7 +624,6 @@
 procedure initModule;
 var
     index: Longword;
-    //uRenderCoordScaleX, uRenderCoordScaleY: Longword;
 begin
     buttonsDown:= 0;
     pointerCount:= 0;