From: Ketmar Dark <ketmar@ketmar.no-ip.org>
Date: Sun, 17 Apr 2016 06:31:05 +0000 (+0300)
Subject: fixed two warnings in headless mode
X-Git-Url: http://deadsoftware.ru/gitweb?a=commitdiff_plain;h=05d257411597abbdcf0ce200b52922a4f32b7e36;p=d2df-sdl.git

fixed two warnings in headless mode
---

diff --git a/src/game/g_sound.pas b/src/game/g_sound.pas
index b1e09f8..b37cd1f 100644
--- a/src/game/g_sound.pas
+++ b/src/game/g_sound.pas
@@ -309,16 +309,16 @@ begin
   end;
 
   WAD.Free();
-{$IFNDEF HEADLESS}
   if (not ok) then
   begin
+{$IFNDEF HEADLESS}
     if isMusic then
       e_WriteLog(Format('Error loading music %s', [Resource]), MSG_WARNING)
     else
       e_WriteLog(Format('Error loading sound %s', [Resource]), MSG_WARNING);
     Exit;
-  end;
 {$ENDIF}
+  end;
   Result := True;
 end;
 
@@ -359,16 +359,16 @@ begin
   end;
 
   WAD.Free();
-{$IFNDEF HEADLESS}
   if (not ok) then
   begin
+{$IFNDEF HEADLESS}
     if isMusic then
       e_WriteLog(Format('Error loading music %s', [Resource]), MSG_WARNING)
     else
       e_WriteLog(Format('Error loading sound %s', [Resource]), MSG_WARNING);
     Exit;
-  end;
 {$ENDIF}
+  end;
   Result := True;
 end;