--- a/hedgewars/CCHandlers.inc	Wed Sep 27 20:13:29 2006 +0000
+++ b/hedgewars/CCHandlers.inc	Wed Sep 27 20:52:22 2006 +0000
@@ -402,23 +402,13 @@
 SDL_ShowCursor(0)
 end;
 
-procedure chVolUp_p(var s: shortstring);
+procedure chVol_p(var s: shortstring);
 begin
-cVolumeDelta:= 3
-end;
-
-procedure chVolUp_m(var s: shortstring);
-begin
-cVolumeDelta:= 0
+inc(cVolumeDelta, 3)
 end;
 
-procedure chVolDown_p(var s: shortstring);
+procedure chVol_m(var s: shortstring);
 begin
-cVolumeDelta:= -3
+dec(cVolumeDelta, 3)
 end;
 
-procedure chVolDown_m(var s: shortstring);
-begin
-cVolumeDelta:= 0
-end;
-