paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-22 12:49:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fix for drive existence in windows app modus, closes #40558

Browse Source
This commit is contained in:
marcoonthegit 2023-12-14 09:37:42 +01:00
parent 5c090fce2c
commit 59883da0a0
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/objpas/sysutils/disk.inc
View File

@ -110,7 +110,7 @@ begin
Result:=False;
ADrv:=ExtractFileDrive(Dir);
if (ADrv<>'') and
(not DirectoryExists(ADrv))
(not DirectoryExists(ADrv)+DirectorySeparator)
{$IFNDEF FORCEDIR_NO_UNC_SUPPORT} and (not IsUncDrive(ADrv)){$ENDIF} then
Exit;
if Dir='' then