--- a/hedgewars/uGears.pas	Mon Feb 25 11:35:24 2013 -0500
+++ b/hedgewars/uGears.pas	Mon Feb 25 12:29:39 2013 -0500
@@ -569,7 +569,10 @@
 while t <> nil do
     begin
     if (t^.Kind = gtHedgehog) or (t^.Kind = gtExplosives) then
-        t^.Active:= true;
+        begin
+        if t^.Kind = gtHedgehog then CheckIce(t);
+        t^.Active:= true
+        end;
     t:= t^.NextGear
     end
 end;