diff options
-rw-r--r-- | src/base/UPath.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/base/UPath.pas b/src/base/UPath.pas index 7c00e7b1..7cb2f649 100644 --- a/src/base/UPath.pas +++ b/src/base/UPath.pas @@ -1028,7 +1028,7 @@ end; function TPathImpl.IsAbsolute(): boolean;
begin
AssertRefCount;
- Result := FileSystem.FileIsReadOnly(Self);
+ Result := FileSystem.FileIsAbsolute(Self);
end;
function TPathImpl.GetAttr(): cardinal;
|