1 files changed, 6 insertions, 1 deletions
diff --git a/Game/Code/Classes/UVideo.pas b/Game/Code/Classes/UVideo.pas
index c18eea6c..65dbc0a2 100644
--- a/Game/Code/Classes/UVideo.pas
+++ b/Game/Code/Classes/UVideo.pas
@@ -14,12 +14,16 @@ unit UVideo;
 //{$define DebugFrames}
 //{$define Info}
 
-//{$define FFMpegAudio}
+// {$define FFMpegAudio}
 {}
 
 
 interface
 
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
+
 {$I switches.inc}
 
 (*
@@ -281,6 +285,7 @@ begin
     else
     if (AVPacket.stream_index = AudioStreamIndex ) then
     begin
+      writeln('Encue Audio packet');
       UAudio_FFMpeg.packet_queue_put(UAudio_FFMpeg.audioq, AVPacket);
     {$endif}
     end;