Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uGearsHandlersMess.pas
changeset 15467 e1467bced64d
parent 15359 c117e17b90bc
child 15468 b56c04fac6f9 
--- a/hedgewars/uGearsHandlersMess.pas	Fri Oct 11 18:52:11 2019 +0200
+++ b/hedgewars/uGearsHandlersMess.pas	Fri Oct 11 18:56:50 2019 +0200
@@ -2348,6 +2348,8 @@
     doStepFallingGear(Gear);
     AllInactive := false;
 
+    if (Gear^.State and gstDrowning) = 0) then
+        exit;
     if Gear^.Timer mod 166 = 0 then
         inc(Gear^.Tag);
     if Gear^.Timer = 1000 then // might need better timing
hedgewars