X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fengine%2Fe_log.pas;h=937730d5d4fd822260f19fbbe9d42861c8ef4192;hb=8213065ce7c035c3c2bb8d8b90ab423d42c0a5ac;hp=3a8d0adc2900ef25e1f3fb3ea896c54320504e3e;hpb=ae4069ace642a386dd8651379dbfb0e6330d915b;p=d2df-sdl.git

diff --git a/src/engine/e_log.pas b/src/engine/e_log.pas
index 3a8d0ad..937730d 100644
--- a/src/engine/e_log.pas
+++ b/src/engine/e_log.pas
@@ -41,6 +41,7 @@ function DecodeIPV4 (ip: LongWord): string;
 procedure e_InitWritelnDriver ();
 
 procedure e_LogWritefln (const fmt: AnsiString; args: array of const; category: TRecordCategory=MSG_NOTIFY; writeTime: Boolean=true);
+procedure e_LogWriteln (const s: AnsiString; category: TRecordCategory=MSG_NOTIFY; writeTime: Boolean=true);
 
 
 var
@@ -70,6 +71,12 @@ begin
 end;
 
 
+procedure e_LogWriteln (const s: AnsiString; category: TRecordCategory=MSG_NOTIFY; writeTime: Boolean=true);
+begin
+  e_LogWritefln('%s', [s], category, writeTime);
+end;
+
+
 // returns formatted string if `writerCB` is `nil`, empty string otherwise
 //function formatstrf (const fmt: AnsiString; args: array of const; writerCB: TFormatStrFCallback=nil): AnsiString;
 //TFormatStrFCallback = procedure (constref buf; len: SizeUInt);