--- a/hedgewars/uSound.pas	Mon Mar 01 19:20:43 2010 +0000
+++ b/hedgewars/uSound.pas	Mon Mar 01 19:54:33 2010 +0000
@@ -206,7 +206,7 @@
 end;
 
 procedure PlayMusic;
-var s: string;
+var s: shortstring;
 begin
 if (not isSoundEnabled)
 	or (MusicFN = '')