hedgewars/uVideoRec.pas
changeset 15488 a7d54832fad6
parent 15357 f53bfe04065e
child 15489 25a5a0f86928
--- a/hedgewars/uVideoRec.pas	Fri Oct 11 16:33:01 2019 +0200
+++ b/hedgewars/uVideoRec.pas	Fri Oct 11 16:54:50 2019 +0200
@@ -48,7 +48,7 @@
 procedure freeModule;
 
 implementation
-uses uVariables, GLunit, SDLh, SysUtils, uUtils, uSound, uIO, uMisc, uTypes, uDebug;
+uses uVariables, GLunit, SDLh, SysUtils, uUtils, uSound, uChat, uIO, uMisc, uTypes, uDebug;
 
 type TAddFileLogRaw = procedure (s: pchar); cdecl;
 const AvwrapperLibName = {$IFDEF WIN32_VCPKG}'avwrapper'{$ELSE}'libavwrapper'{$ENDIF};
@@ -291,6 +291,7 @@
         begin
         // TODO: Show message to player
         PlaySound(sndDenied);
+        AddChatString(#0 + shortstring(trmsg[sidVideoRecLuaFail]));
         AddFileLog('Pre-recording prevented; /lua command was used before');
         exit;
         end;