Always return absolute paths from GetFileInfoSL

1 files changed, 4 insertions, 2 deletions

diff --git a/vfs/UVFSCore.pas b/vfs/UVFSCore.pas
index 4dd00b1..c1e8fd4 100644
--- a/vfs/UVFSCore.pas
+++ b/vfs/UVFSCore.pas
@@ -572,8 +572,10 @@ begin
     Item := malloc(SizeOf(TDataItemSL));
     memset(Item, 0, SizeOf(TDataItemSL));
     with Item^ do begin
-      FName := strdup(P^.sFileName);
-      FDisplayName := StrToUTF8(P^.sFileName);
+{      FName := strdup(P^.sFileName);
+      FDisplayName := StrToUTF8(P^.sFileName); }
+      FName := strdup(PChar(APath));
+      FDisplayName := StrToUTF8(PChar(APath));
       if P^.sLinkTo <> nil then LnkPointTo := strdup(P^.sLinkTo)
                            else LnkPointTo := nil;
       ADestination := nil;