--- a/hedgewars/uWorld.pas	Sat Apr 07 22:13:15 2012 +0200
+++ b/hedgewars/uWorld.pas	Sun Apr 08 18:11:37 2012 +0200
@@ -1712,6 +1712,9 @@
 begin
 if (not cHasFocus) and (GameState <> gsConfirm) then
     ParseCommand('quit', true);
+
+if not cHasFocus then DampenAudio()
+else UndampenAudio();
 end;
 
 procedure animateWidget(widget: POnScreenWidget; fade, showWidget: boolean);