Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uGears.pas
changeset 6596 4c06ea12de1c
parent 6580 6155187bf599
child 6700 e04da46ee43c 
--- a/hedgewars/uGears.pas	Tue Jan 24 03:38:18 2012 +0100
+++ b/hedgewars/uGears.pas	Tue Jan 24 11:54:53 2012 -0500
@@ -418,10 +418,10 @@
                 and (not PlacingHogs)
                 and (CurrentHedgehog^.Gear <> nil)
                 and ((CurrentHedgehog^.Gear^.State and gstAttacked) = 0) then
-                    AddVoice(sndHurry, CurrentTeam^.voicepack);
+                    PlaySound(sndHurry, CurrentTeam^.voicepack);
             if ReadyTimeLeft > 0 then
                 begin
-                if ReadyTimeLeft = 2000 then
+                if (ReadyTimeLeft = 2000) and (LastVoice.snd = sndNone) then
                     AddVoice(sndComeonthen, CurrentTeam^.voicepack);
                 dec(ReadyTimeLeft)
                 end
hedgewars