index 35cd2c34430ed5db0aa0190b2276ee605c82a4f5..9436cec6b42dee983b3ce2d5ae2aef01c68e5082 100644 (file)
interface
uses
- sdl2,
- SDL2_mixer,
{$IFDEF USE_MEMPOOL}mempool,{$ENDIF}
- e_log,
- SysUtils;
+ SDL2, SDL2_mixer, envvars,
+ e_log, SysUtils;
type
TSoundRec = record
Result := False;
SoundInitialized := False;
+ {$IFDEF HEADLESS}
+ // HACK: shit this into env and hope for the best
+ SetEnvVar('SDL_AUDIODRIVER', 'dummy');
+ {$ENDIF}
+
if NoOutput then begin Result := true; Exit end;
// wow, this is actually MIDI player!