From 310d127b07240e75aa29798cb1b024cede03cbf6 Mon Sep 17 00:00:00 2001 From: canni0 Date: Sun, 15 Aug 2010 18:23:25 +0000 Subject: - fixed absolute path function (thx to the anonymous irc guy) git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@2612 b956fd51-792f-4845-bead-9b4dfca2ff2c --- src/base/UPath.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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; -- cgit v1.2.3