restore screwed up test
authornemo
Tue, 23 Aug 2011 09:32:59 -0400
changeset 5673 85336f377479
parent 5672 34bb680476d4
child 5674 244cbc1448bd
restore screwed up test
hedgewars/uSound.pas
--- a/hedgewars/uSound.pas	Tue Aug 23 09:12:45 2011 -0400
+++ b/hedgewars/uSound.pas	Tue Aug 23 09:32:59 2011 -0400
@@ -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);