From 803045be7fa3489203eafbb48a61e41c0484c685 Mon Sep 17 00:00:00 2001
From: graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>
Date: Fri, 28 Mar 2008 11:00:02 +0000
Subject: * Applied a minor patch from Michael van Canneyt which reduces the
 calls to readlink in X11 file dialog.

---
 src/corelib/x11/gfx_x11.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/corelib/x11')

diff --git a/src/corelib/x11/gfx_x11.pas b/src/corelib/x11/gfx_x11.pas
index c648dd9d..67d85e7b 100644
--- a/src/corelib/x11/gfx_x11.pas
+++ b/src/corelib/x11/gfx_x11.pas
@@ -2237,8 +2237,8 @@ begin
   if Assigned(Result) then
   begin
     fullname           := DirectoryName + Result.Name;
-    Result.IsLink      := FileIsSymlink(fullname);
     Result.LinkTarget  := ExtractTargetSymLinkPath(fullname);
+    Result.IsLink:=(Result.LinkTarget<>'');
     Result.mode        := sr.Mode;
     Fpstat(PChar(fullname), info);
     Result.GroupID     := info.st_gid;
-- 
cgit v1.2.3-70-g09d2