hedgewars/uGearsHandlersMess.pas
changeset 12919 0de553fb7e89
parent 12903 8a40ce061d94
child 12994 c08c53624c0f
--- a/hedgewars/uGearsHandlersMess.pas	Wed Feb 07 03:56:53 2018 +0100
+++ b/hedgewars/uGearsHandlersMess.pas	Wed Feb 07 05:36:32 2018 +0100
@@ -6615,7 +6615,6 @@
 ////////////////////////////////////////////////////////////////////////////////
 procedure doStepMinigunWork(Gear: PGear);
 var HHGear: PGear;
-    i: LongWord;
     shell: PVisualGear;
     bullet: PGear;
     rx, ry: hwFloat;