hedgewars/HHHandlers.inc
changeset 3402 b1fbf50da522
parent 3399 885304636abf
child 3407 dcc129c4352e
--- a/hedgewars/HHHandlers.inc	Sun May 02 16:24:31 2010 +0000
+++ b/hedgewars/HHHandlers.inc	Sun May 02 16:28:06 2010 +0000
@@ -190,7 +190,8 @@
                                      begin
                                      newGear^.IntersectGear:= portal;
                                      if portal^.Tag < 2 then newGear^.Tag:= 2
-                                     end;
+                                     end
+                                 else newGear^.IntersectGear:= nil;
                                  newGear^.Angle:= Angle;
                                  newGear^.DirAngle:= Angle * 180 / cMaxAngle - 90;
                                  if Gear^.DirAngle < 0 then Gear^.DirAngle:= Gear^.DirAngle + 360