hedgewars/uGears.pas
changeset 7053 8c9dcaedc7a8
parent 7028 0f60591f3a16
child 7061 4e0fc59ab1ce
--- a/hedgewars/uGears.pas	Fri May 11 19:33:21 2012 +0400
+++ b/hedgewars/uGears.pas	Fri May 11 20:01:57 2012 +0400
@@ -193,7 +193,7 @@
     StepSoundChannel:= LoopSound(sndSteps)
 else if (StepSoundTimer = 0) and (StepSoundChannel > -1) then
     begin
-    StopSound(StepSoundChannel);
+    StopSoundChan(StepSoundChannel);
     StepSoundChannel:= -1
     end;
 
@@ -422,7 +422,7 @@
                 and (not PlacingHogs)
                 and (CurrentHedgehog^.Gear <> nil)
                 and ((CurrentHedgehog^.Gear^.State and gstAttacked) = 0) then
-                    PlaySound(sndHurry, CurrentTeam^.voicepack);
+                    PlaySoundV(sndHurry, CurrentTeam^.voicepack);
             if ReadyTimeLeft > 0 then
                 begin
                 if (ReadyTimeLeft = 2000) and (LastVoice.snd = sndNone) then