hedgewars/uSound.pas
branchhedgeroid
changeset 5725 e27100a0e2d0
parent 5655 44c2d19f79e2
parent 5673 85336f377479
child 5932 5164d17b6374
--- a/hedgewars/uSound.pas	Thu Sep 01 14:55:31 2011 +0200
+++ b/hedgewars/uSound.pas	Thu Sep 01 17:03:19 2011 +0200
@@ -301,7 +301,7 @@
 procedure PlayNextVoice;
 var i : LongInt;
 begin
-    if (not isSoundEnabled) or fastUntilLag or (LastVoice.snd = sndNone) or (lastChan[LastVoice.snd] = -1) or (Mix_Playing(lastChan[LastVoice.snd]) = 0) then exit;
+    if (not isSoundEnabled) or fastUntilLag or ((LastVoice.snd <> sndNone) and (lastChan[LastVoice.snd] <> -1) and (Mix_Playing(lastChan[LastVoice.snd]) <> 0)) then exit;
     i:= 0;
     while (i<8) and (VoiceList[i].snd = sndNone) do inc(i);