--- a/hedgewars/uGearsHandlersMess.pas	Thu Feb 07 23:34:24 2019 +0300
+++ b/hedgewars/uGearsHandlersMess.pas	Wed Feb 13 19:39:14 2019 -0500
@@ -2148,7 +2148,7 @@
         for t:= 0 to Pred(TeamsCount) do
             with TeamsArray[t]^ do
                 for i:= 0 to cMaxHHIndex do
-                    if Hedgehogs[i].Gear <> nil then
+                    if (Hedgehogs[i].Gear <> nil) and (Hedgehogs[i].Effects[heFrozen] = 0) then
                         begin
                         tmpG:= Hedgehogs[i].Gear;
                         tX:=Gear^.X-tmpG^.X;