hedgewars/VGSHandlers.inc
branch0.9.16
changeset 6005 3470f3f547ca
parent 5874 5cd329cf2460
child 6179 b529f88d37d0
--- a/hedgewars/VGSHandlers.inc	Sun Oct 16 19:02:48 2011 +0200
+++ b/hedgewars/VGSHandlers.inc	Tue Oct 18 05:43:16 2011 +0200
@@ -172,7 +172,10 @@
 Gear^.Angle:= round(Gear^.Angle + Steps) mod cMaxAngle;
 
 if Gear^.FrameTicks <= Steps then
-    DeleteVisualGear(Gear)
+    begin
+    DeleteVisualGear(Gear);
+    exit
+    end
 else
     dec(Gear^.FrameTicks, Steps);