# HG changeset patch
# User koda
# Date 1321216091 -3600
# Node ID a7fbf18b2d55ad72bf28f3cab894c3450aea6987
# Parent  c992df555afb4936939ae09bd11822927fd4dc23
be more gentle when you stop channels at the end of the game

diff -r c992df555afb -r a7fbf18b2d55 hedgewars/uSound.pas
--- a/hedgewars/uSound.pas	Sun Nov 13 21:18:33 2011 +0100
+++ b/hedgewars/uSound.pas	Sun Nov 13 21:28:11 2011 +0100
@@ -307,7 +307,7 @@
     if (not isSoundEnabled) or fastUntilLag or ((LastVoice.snd = snd) and  (LastVoice.voicepack = voicepack)) then exit;
     if (snd = sndVictory) or (snd = sndFlawless) then
         begin
-        Mix_HaltChannel(-1);
+        Mix_FadeOutChannel(-1, 800);
         for i:= 0 to 7 do VoiceList[i].snd:= sndNone;
         LastVoice.snd:= sndNone;
         end;