hedgewars/uGearsList.pas
branchqmlfrontend
changeset 11828 a69124eb7ce7
parent 11765 10860d4bca22
child 11831 dd18d8100afd
--- a/hedgewars/uGearsList.pas	Tue May 17 23:18:08 2016 +0300
+++ b/hedgewars/uGearsList.pas	Tue May 17 23:29:49 2016 +0300
@@ -427,7 +427,7 @@
                     end
                 end;
      gtAirMine: begin
-                gear^.ImpactSound:= sndDenied;
+                gear^.ImpactSound:= sndAirMineImpact;
                 gear^.nImpactSounds:= 1;
                 gear^.Health:= 30;
                 gear^.State:= gear^.State or gstMoving or gstNoGravity or gstSubmersible;
@@ -459,6 +459,7 @@
                 if gear^.Timer = 0 then gear^.Timer:= 500;
                 end;
        gtKnife: begin
+                gear^.ImpactSound:= sndKnifeImpact;
                 gear^.AdvBounce:= 1;
                 gear^.Elasticity:= _0_8;
                 gear^.Friction:= _0_8;