hedgewars/GSHandlers.inc
changeset 2262 0dc94341bf42
parent 2228 7f4613bae01a
child 2267 ad372e549cc5
--- a/hedgewars/GSHandlers.inc	Tue Jul 14 20:02:07 2009 +0000
+++ b/hedgewars/GSHandlers.inc	Wed Jul 15 00:35:59 2009 +0000
@@ -1613,6 +1613,7 @@
 if (Gear^.State and gstCollision) <> 0 then
 	begin
 	doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 20, EXPLAutoSound);
+	soundFadeOut(sndMortar,10,nil);
 
 	Gear^.dX.isNegative:= not dxn;
 	Gear^.dY.isNegative:= not dyn;