hedgewars/uSound.pas
changeset 181 7dfffbf0c7f6
parent 175 d226d976d836
child 183 57c2ef19f719
--- a/hedgewars/uSound.pas	Mon Oct 02 18:09:39 2006 +0000
+++ b/hedgewars/uSound.pas	Tue Oct 03 19:02:08 2006 +0000
@@ -120,6 +120,11 @@
 
 function ChangeVolume(voldelta: integer): integer;
 begin
+if not isSoundEnabled then
+   begin
+   Result:= 0;
+   exit
+   end;
 inc(Volume, voldelta);
 if Volume < 0 then Volume:= 0;
 Mix_Volume(-1, Volume);