IDE: Close progress dialog after rescanning FPC source directory. Issue #30822, patch from Balázs Székely.

git-svn-id: trunk@53265 -
This commit is contained in:
juha 2016-10-30 17:06:06 +00:00
parent 84d5bd33eb
commit 149d296da7

View File

@ -121,6 +121,7 @@ begin
ApplyFPCSrcFiles(Directory,Files);
// delete item in progress window
debugln(['TFPCSrcScan.OnFilesGathered closing progress item ...']);
ProgressItem.Window.Close;
FreeAndNil(ProgressItem);
Scans.Remove(Self);
debugln(['TFPCSrcScan.OnFilesGathered END']);