# HG changeset patch # User unc0rr # Date 1230907595 0 # Node ID c0eea030347bec97749d3f9805561ba96e987494 # Parent f0af4e5fe88025a03f629874cf32a30271b5533c Don't play sounds when quick replaying in spectate mode diff -r f0af4e5fe880 -r c0eea030347b hedgewars/uSound.pas --- a/hedgewars/uSound.pas Fri Jan 02 14:22:55 2009 +0000 +++ b/hedgewars/uSound.pas Fri Jan 02 14:46:35 2009 +0000 @@ -83,7 +83,7 @@ procedure PlaySound(snd: TSound; infinite: boolean); var loops: LongInt; begin -if not isSoundEnabled then exit; +if (not isSoundEnabled) or fastUntilLag then exit; if infinite then loops:= -1 else loops:= 0; Soundz[snd].lastChan:= Mix_PlayChannelTimed(-1, Soundz[snd].id, loops, -1) end;