mirror of https://gitlab.com/basile.b/dexed.git
fix, possible RT err if basepath does not exist
This commit is contained in:
parent
6da6698ff0
commit
8091356ba5
|
@ -393,7 +393,7 @@ begin
|
||||||
curr := '';
|
curr := '';
|
||||||
getDir(0, curr);
|
getDir(0, curr);
|
||||||
try
|
try
|
||||||
if curr <> aBasePath then
|
if (curr <> aBasePath) and DirectoryExists(aBasePath) then
|
||||||
chDir(aBasePath);
|
chDir(aBasePath);
|
||||||
result := expandFileName(aFilename);
|
result := expandFileName(aFilename);
|
||||||
finally
|
finally
|
||||||
|
|
Loading…
Reference in New Issue