From 4e2c94c4c917430476d675d2ce61d623ec21a992 Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Sat, 13 Mar 2021 12:57:34 +0000
Subject: [PATCH] IDE: Update DefineTemplates of all packages after switching a
 project.

git-svn-id: trunk@64794 -
---
 ide/mainbase.pas          | 6 ++++++
 ide/sourcefilemanager.pas | 4 +---
 2 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/ide/mainbase.pas b/ide/mainbase.pas
index b016cf1e9d..8591a36a0a 100644
--- a/ide/mainbase.pas
+++ b/ide/mainbase.pas
@@ -200,6 +200,7 @@ type
     procedure DoOpenRecentFile(AFilename: string);
 
     procedure UpdateHighlighters(Immediately: boolean = false); override;
+    procedure UpdateDefineTemplates;
 
     procedure FindInFilesPerDialog(AProject: TProject); override;
     procedure FindInFiles(AProject: TProject; const FindText: string); override;
@@ -1754,6 +1755,11 @@ begin
     Include(FIdleIdeActions, iiaUpdateHighlighters);
 end;
 
+procedure TMainIDEBase.UpdateDefineTemplates;
+begin
+  Include(FIdleIdeActions, iiaUpdateDefineTemplates);
+end;
+
 procedure TMainIDEBase.FindInFilesPerDialog(AProject: TProject);
 begin
   FindInFilesDialog.FindInFilesPerDialog(AProject);
diff --git a/ide/sourcefilemanager.pas b/ide/sourcefilemanager.pas
index 3047c7b760..ed8161a184 100644
--- a/ide/sourcefilemanager.pas
+++ b/ide/sourcefilemanager.pas
@@ -7425,10 +7425,8 @@ begin
 
   // load required packages
   PkgBoss.OpenProjectDependencies(Project1, MainIDE.IDEStarted);
-
-  //DebugLn('CompleteLoadingProjectInfo ',Project1.IDAsString);
   Project1.DefineTemplates.Active:=true;
-
+  MainIDE.UpdateDefineTemplates;
   Result:=mrOk;
 end;