hedgewars/uSound.pas
changeset 611 8cf6d27cec86
parent 576 35a1af355ada
child 1066 1f1b3686a2b0
--- a/hedgewars/uSound.pas	Sat Sep 22 17:04:28 2007 +0000
+++ b/hedgewars/uSound.pas	Sat Sep 22 17:50:14 2007 +0000
@@ -37,8 +37,10 @@
 
 const chanTPU = 12;
 var Mus: PMixMusic = nil;
+    Volume: LongInt;
+{$IFDEF HAVE_MUSIC}
     CurrMusic: Longword = 0;
-    Volume: LongInt;
+{$ENDIF}
 
 procedure InitSound;
 begin