forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix #22, hang with some rel paths in DUB projs

This commit is contained in:
Basile Burg 2016-02-29 02:33:50 +01:00
parent 166bca0f14
commit 1d3c14c000
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/ce_dubproject.pas
View File

@ -615,10 +615,10 @@ begin
for i := 0 to arr.Count-1 do for i := 0 to arr.Count-1 do
begin begin
pth := TrimRightSet(arr.Strings[i], ['/','\']); pth := TrimRightSet(arr.Strings[i], ['/','\']);
if pth.dirExists then if pth.dirExists and FilenameIsAbsolute(pth) then
tryAddFromFolder(pth) tryAddFromFolder(pth)
else else
tryAddFromFolder(fBasePath + pth); tryAddFromFolder(expandFilenameEx(fBasePath, pth));
end; end;
end; end;
// custom files // custom files
@ -643,10 +643,10 @@ begin
for i := 0 to arr.Count-1 do for i := 0 to arr.Count-1 do
begin begin
pth := TrimRightSet(arr.Strings[i], ['/','\']); pth := TrimRightSet(arr.Strings[i], ['/','\']);
if pth.dirExists then if pth.dirExists and FilenameIsAbsolute(pth) then
tryAddFromFolder(pth) tryAddFromFolder(pth)
else else
tryAddFromFolder(fBasePath + pth); tryAddFromFolder(expandFilenameEx(fBasePath, pth));
end; end;
end; end;
// custom files in current config // custom files in current config