From 9007567a5e0ab15b6812b7ceddfc29407b8e23f4 Mon Sep 17 00:00:00 2001
From: Martin <laz.git@mfriebe.de>
Date: Fri, 11 Mar 2022 16:52:46 +0100
Subject: [PATCH] Codetools: Fix compilation of IFDEFed code.

---
 components/codetools/identcompletiontool.pas | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/components/codetools/identcompletiontool.pas b/components/codetools/identcompletiontool.pas
index 5bf001c91c..9dd3b438eb 100644
--- a/components/codetools/identcompletiontool.pas
+++ b/components/codetools/identcompletiontool.pas
@@ -4426,8 +4426,8 @@ begin
   if NewItem=nil then exit;
   OldAVLNode:=FindItem(NewItem);
   {$IFDEF ShowHistory}
-  DebugLn('TIdentifierHistoryList.Add Count=',Count,' Found=',OldAVLNode<>nil,
-    ' ITEM: ',NewItem.AsString);
+  DebugLn(['TIdentifierHistoryList.Add Count=',Count,' Found=',OldAVLNode<>nil,
+    ' ITEM: ',NewItem.AsString]);
   {$ENDIF}
   if OldAVLNode<>nil then begin
     // already in tree
@@ -4457,7 +4457,7 @@ begin
     FItems.FreeAndDelete(FItems.FindHighest);
   FItems.Add(NewHistItem);
   {$IFDEF ShowHistory}
-  DebugLn('TIdentifierHistoryList.Added Count=',Count);
+  DebugLn(['TIdentifierHistoryList.Added Count=',Count]);
   {$ENDIF}
 end;