Merge pull request #4 from JTheiller/main

fix: Loss of logs and content with data from the previous record
HashLoad · Jan 28, 2025 · b506b50 · b506b50
2 parents 86ffbd4 + 6f79ebc
commit b506b50
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/Horse.Logger.Provider.Console.pas b/src/Horse.Logger.Provider.Console.pas
@@ -96,7 +96,7 @@ procedure THorseLoggerProviderConsole.DoReceiveLogCache(ALogCache: THorseLoggerC
   I: Integer;
 begin
   for I := 0 to Pred(ALogCache.Count) do
-    FHorseLoggerProviderConsoleManager.NewLog(THorseLoggerLog(ALogCache.Items[0].Clone));
+    FHorseLoggerProviderConsoleManager.NewLog(THorseLoggerLog(ALogCache.Items[I].Clone));
 end;
 
 class function THorseLoggerProviderConsole.New(const AConfig: THorseLoggerConsoleConfig = nil): IHorseLoggerProvider;
@@ -125,13 +125,13 @@ procedure THorseLoggerProviderConsoleManager.DispatchLogCache;
 begin
   if FConfig = nil then
     FConfig := THorseLoggerConsoleConfig.New;
-  FConfig.GetLogFormat(LLogStr);
   LLogCache := ExtractLogCache;
   try
     if LLogCache.Count = 0 then
       Exit;
     for I := 0 to Pred(LLogCache.Count) do
     begin
+      LLogStr := FConfig.FLogFormat;
       LLog := LLogCache.Items[I] as THorseLoggerLog;
       LParams := THorseLoggerUtils.GetFormatParams(LLogStr);
       for Z := Low(LParams) to High(LParams) do