paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-10 14:56:00 +02:00
Code Issues Packages Projects Releases Wiki Activity

ide: pass star * dir as separate paths to fpc

Browse Source
This commit is contained in:
mattias 2023-08-04 23:30:17 +02:00
parent 13fd89ae20
commit 7c26a69c73
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/compileroptions.pp
View File

@ -944,7 +944,7 @@ begin
CurPath:=copy(Paths,StartPos,EndPos-StartPos);
StartPos:=EndPos+1;
Kind:=IsCTStarDirectory(CurPath,p);
if Kind=ctsdStarStar then
if Kind in [ctsdStar,ctsdStarStar] then
begin
Delete(CurPath,p+1,length(CurPath));
IsRelative:=not FilenameIsAbsolute(CurPath);