--- a/hedgewars/uGearsUtils.pas	Fri Jan 17 16:13:10 2014 -0500
+++ b/hedgewars/uGearsUtils.pas	Sat Jan 18 08:09:55 2014 -0500
@@ -154,7 +154,7 @@
                                 if Gear^.Kind <> gtFlame then FollowGear:= Gear
                                 end;
                             if ((Mask and EXPLPoisoned) <> 0) and (Gear^.Kind = gtHedgehog) and (Gear^.Hedgehog^.Effects[heInvulnerable] = 0) and (Gear^.State and gstHHDeath = 0) then
-                                Gear^.Hedgehog^.Effects[hePoisoned] := 1;
+                                Gear^.Hedgehog^.Effects[hePoisoned] := 5;
                             end;
 
                         end;