From 9462f53d98261bf908205827a3c841416f29c9c4 Mon Sep 17 00:00:00 2001
From: Tomas Bzatek <tbzatek@users.sourceforge.net>
Date: Sun, 24 Aug 2008 23:03:38 +0200
Subject: Always return absolute paths from GetFileInfoSL

---
 vfs/UVFSCore.pas | 6 ++++--
 1 file 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;
-- 
cgit v1.2.3