hedgewars/uGears.pas
changeset 5977 0b1bfdd95310
parent 5958 f9e3033d929f
child 5995 647d52370ce9
child 6081 537bbd5c1a62
--- a/hedgewars/uGears.pas	Wed Sep 21 02:05:42 2011 +0200
+++ b/hedgewars/uGears.pas	Tue Sep 20 20:52:04 2011 -0400
@@ -602,14 +602,16 @@
             Gear^.IntersectGear^.IntersectGear:= nil;
     end
 else if Gear^.Kind = gtHedgehog then
-    if (CurAmmoGear <> nil) and (CurrentHedgehog^.Gear = Gear) then
+    (*
+    This behaviour dates back to revision 4, and I accidentally encountered it with TARDIS.  I don't think it must apply to any modern weapon, since if it was actually hit, the best the gear could do would be to destroy itself immediately, and you'd still end up with two graves.  I believe it should be removed
+     if (CurAmmoGear <> nil) and (CurrentHedgehog^.Gear = Gear) then
         begin
         AttackBar:= 0;
         Gear^.Message:= gmDestroy;
         CurAmmoGear^.Message:= gmDestroy;
         exit
         end
-    else
+    else*)
         begin
         if (hwRound(Gear^.Y) >= cWaterLine) then
             begin