X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_sound.pas;h=2aa1b38cd199a2ae1b3b2817bd5bb34850e283f5;hb=51998d817120cd3833df7bae3d355642fd4abde5;hp=2cc02ad2aec4672815a071e1deafc2064b61495f;hpb=dfc542926a3a356709f099050b2d2d59cb101e9d;p=d2df-sdl.git

diff --git a/src/game/g_sound.pas b/src/game/g_sound.pas
index 2cc02ad..2aa1b38 100644
--- a/src/game/g_sound.pas
+++ b/src/game/g_sound.pas
@@ -2,8 +2,7 @@
  *
  * This program is free software: you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation, either version 3 of the License, or
- * (at your option) any later version.
+ * the Free Software Foundation, version 3 of the License ONLY.
  *
  * This program is distributed in the hope that it will be useful,
  * but WITHOUT ANY WARRANTY; without even the implied warranty of
@@ -213,8 +212,7 @@ begin
     Pan := pan1;
     Volume := 1.0 - len1 / sMaxDist;
     Result := True
-  end;
-  e_LogWritefln('PlaySounAtRect: Pan = %s | Volume = %s | Result = %s', [Pan, Volume, Result]);
+  end
 end;
 
 function PlaySoundAt(X, Y: Integer; out Pan: Single; out Volume: Single; InVolume: Single = 1.0): Boolean;
@@ -635,4 +633,10 @@ begin
   Pause(Enable);
 end;
 
+{$IFDEF USE_OPENAL}
+initialization
+  conRegVar('s_midi_soundfont', @e_SoundFont, 'soundfont to use for midi playback', 'midi soundfont');
+  conRegVar('s_mod_lerp', @e_MusicLerp, 'interpolate module playback', 'module interpolation');
+{$ENDIF}
+
 end.