hedgewars/VGSHandlers.inc
changeset 6128 c90f50e6dd8e
parent 5874 5cd329cf2460
child 6179 b529f88d37d0
--- a/hedgewars/VGSHandlers.inc	Thu Oct 13 11:15:07 2011 -0400
+++ b/hedgewars/VGSHandlers.inc	Thu Oct 13 13:50:41 2011 -0400
@@ -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);