hedgewars/uSound.pas
changeset 6521 16d9ac07f504
parent 6472 bced12412f94
child 6551 a2f39cb9af62
--- a/hedgewars/uSound.pas	Thu Dec 08 14:44:10 2011 +0400
+++ b/hedgewars/uSound.pas	Thu Dec 08 23:30:03 2011 -0500
@@ -487,7 +487,10 @@
         exit;
 
     if Mus <> nil then
+        begin
         Mix_FreeMusic(Mus);
+        Mus:= nil;
+        end
 end;
 
 procedure chVoicepack(var s: shortstring);