# HG changeset patch
# User Wuzzy <Wuzzy2@mail.ru>
# Date 1570813010 -7200
# Node ID e1467bced64d198b64ef7bb0fa99918b53b2c097
# Parent  c788c38f238d87028046ad81444af375b3a4332a
Dynamite handler: Exit early when drowning

diff -r c788c38f238d -r e1467bced64d hedgewars/uGearsHandlersMess.pas
--- 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