From 3e4403e6912d5e047df3e85ee9517bc9d3572e07 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Mon, 31 Jul 2023 13:29:37 +0200
Subject: [PATCH] codetools: skip star direcory when listing star directory

---
 components/codetools/directorycacher.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/components/codetools/directorycacher.pas b/components/codetools/directorycacher.pas
index eb89e5a0ca..324b047ba4 100644
--- a/components/codetools/directorycacher.pas
+++ b/components/codetools/directorycacher.pas
@@ -2165,6 +2165,7 @@ var
     CurDir, ExcludeMask: String;
   begin
     CurDir:=ExtractFilename(CurSubDir);
+    if (CurDir='*') or (CurDir='**') then exit(true);
     for i:=0 to Excludes.Count-1 do begin
       ExcludeMask:=Excludes[i];
       if FilenameIsMatching(ExcludeMask,CurSubDir,true)