hedgewars/uGearsHandlersMess.pas
changeset 14937 896707084562
parent 14936 d6a8ef85cf53
child 14955 088c1d319612
--- a/hedgewars/uGearsHandlersMess.pas	Tue May 14 02:29:29 2019 +0200
+++ b/hedgewars/uGearsHandlersMess.pas	Tue May 14 03:23:34 2019 +0200
@@ -2564,6 +2564,8 @@
                 PlaySound(Gear^.ImpactSound);
             end;
         CheckGearDrowning(Gear);
+        if ((Gear^.State and gstDrowning) <> 0) then
+            Gear^.RenderHealth:= false;
         end;
 
     if (Gear^.dY.QWordValue = 0) then