hedgewars/GSHandlers.inc
changeset 2470 44b66fbf37da
parent 2468 0b62498c201a
child 2475 e0646a529a38
--- a/hedgewars/GSHandlers.inc	Thu Oct 15 21:47:24 2009 +0000
+++ b/hedgewars/GSHandlers.inc	Thu Oct 15 23:54:18 2009 +0000
@@ -226,7 +226,8 @@
 	CalcRotationDirAngle(Gear);
 
 	if (Gear^.State and gstCollision) <> 0 then begin
-		doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 5, EXPLAutoSound);
+		PlaySound(sndMolotov, false, nil);
+		//doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 5, EXPLAutoSound);
 		for i:= 0 to 40 do begin
 				dX:= AngleCos(i * 2) * ((_0_08*(i mod 10))) * (GetRandom + _1);
 				dY:= AngleSin(i * 8) * _0_5 * (GetRandom + _1);