diff -r e04da46ee43c -r 58a43c2064ad hedgewars/uTypes.pas
--- a/hedgewars/uTypes.pas	Fri Feb 17 18:23:36 2012 +0100
+++ b/hedgewars/uTypes.pas	Fri Feb 17 21:34:33 2012 +0100
@@ -425,20 +425,20 @@
 
     PWidgetMovement = ^TWidgetMovement;
     TWidgetMovement = record
-        animate: Boolean;
-        source: TPoint;
-        target: TPoint;
-        startTime: Longword;
+        animate   : Boolean;
+        source    : TPoint;
+        target    : TPoint;
+        startTime : Longword;
         end;
 
     POnScreenWidget = ^TOnScreenWidget;
     TOnScreenWidget = record
-        show: boolean;                      // if false widget will not be drawn
-        sprite: TSprite;                    // a convenience type
-        frame: TSDL_Rect;                   // graphical coordinates
-        active: TSDL_Rect;                  // active touch region
-        fadeAnimStart: Longword;            // time the fade started, 0 means don't fade
-        moveAnim: TWidgetMovement;          // the animation associated to the widget
+        show          : boolean;                      // if false widget will not be drawn
+        sprite        : TSprite;                    // a convenience type
+        frame         : TSDL_Rect;                   // graphical coordinates
+        active        : TSDL_Rect;                  // active touch region
+        fadeAnimStart : Longword;            // time the fade started, 0 means don't fade
+        moveAnim      : TWidgetMovement;          // the animation associated to the widget
         end;
 
 {$IFDEF SDL13}
@@ -449,6 +449,7 @@
         dx,dy                    : LongInt;
         historicalX, historicalY : LongInt;
         timeSinceDown            : Longword;
+        pressedWidget            : POnScreenWidget;
         end;
 {$ENDIF}