hedgewars/uGearsList.pas
changeset 15820 b6379a7ed674
parent 15715 e0cdb6ae88ab
--- a/hedgewars/uGearsList.pas	Sat Oct 16 01:06:05 2021 +0300
+++ b/hedgewars/uGearsList.pas	Sat Oct 16 01:21:26 2021 +0300
@@ -629,7 +629,7 @@
                 gear^.Friction:= _0_995
                 end;
    gtBlowTorch: begin
-                gear^.Radius:= cHHRadius + cBlowTorchC;
+                gear^.Radius:= cHHRadius + cBlowTorchC - 1;
                 if gear^.Timer = 0 then gear^.Timer:= 7500
                 end;
     gtSwitcher: begin