Преглед на файлове

+ Fixed FileGetAttr so hidden is correctly detected

git-svn-id: trunk@3790 -
michael преди 19 години
родител
ревизия
305e4142ff
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      rtl/unix/sysutils.pp

+ 1 - 1
rtl/unix/sysutils.pp

@@ -647,7 +647,7 @@ begin
   If  FpStat (FileName,Info)<0 then
     Result:=-1
   Else
-    Result:=LinuxToWinAttr(Pchar(FileName),Info);
+    Result:=LinuxToWinAttr(Pchar(ExtractFileName(FileName)),Info);
 end;