--- a/hedgewars/uVisualGears.pas	Wed Nov 17 22:21:29 2010 +0300
+++ b/hedgewars/uVisualGears.pas	Wed Nov 17 22:26:34 2010 +0300
@@ -33,10 +33,6 @@
 procedure AddClouds;
 procedure AddDamageTag(X, Y, Damage, Color: LongWord);
 
-var VisualGearsList: PVisualGear;
-    vobFrameTicks, vobFramesCount, vobCount: Longword;
-    vobVelocity, vobFallSpeed: LongInt;
-
 implementation
 uses uWorld, uMisc, uStore, uSound, uMobile, uVariables;