# HG changeset patch # User Xeli # Date 1329490531 -3600 # Node ID 804e9076d136d36042b783a451d0d005127f27a2 # Parent 4a04c02bc8c3d42866532e97098774a9ccad6055 forgot begin diff -r 4a04c02bc8c3 -r 804e9076d136 hedgewars/uTouch.pas --- a/hedgewars/uTouch.pas Fri Feb 17 15:35:20 2012 +0400 +++ b/hedgewars/uTouch.pas Fri Feb 17 15:55:31 2012 +0100 @@ -542,6 +542,7 @@ end; function isOnRect(rect: TSDL_Rect; finger: TTouch_Data): boolean; +begin isOnRect:= (finger.x > rect.x) and (finger.x < rect.x + rect.w) and (cScreenHeight - finger.y > rect.y) and