From 0654e549d1f8252deb9c598b19299e0c599f5fec Mon Sep 17 00:00:00 2001
From: Tomas Bzatek <tbzatek@users.sourceforge.net>
Date: Sat, 3 Oct 2009 18:24:22 +0200
Subject: Search: make GoTo File function work properly inside non-local engine

---
 USearch.pas | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'USearch.pas')

diff --git a/USearch.pas b/USearch.pas
index eb609c3..4339f5e 100644
--- a/USearch.pas
+++ b/USearch.pas
@@ -81,6 +81,7 @@ type
   TSearchThread = class(TThread)
   private
     FEngine: TPanelEngine;
+    FRootEngine: TPanelEngine;
     Wilds: array of string;
     GUIMutex: TCriticalSection;
     procedure Rekurze(StartDir: string);
@@ -850,6 +851,7 @@ begin
   FSearchArchives := False;
 
   FEngine := Engine;
+  FRootEngine := Engine;
   FList := TList.Create; 
 end;
 
@@ -974,7 +976,8 @@ begin
               libc_free(PDataItem(LocalList[i])^.LnkPointTo);
               PDataItem(LocalList[i])^.LnkPointTo := nil;
             end;
-            if FEngine is TVFSEngine then PDataItem(LocalList[i])^.LnkPointTo := strdup(PChar((FEngine as TVFSEngine).SavePath));
+            if (FEngine is TVFSEngine) and (FRootEngine <> FEngine)
+              then PDataItem(LocalList[i])^.LnkPointTo := strdup(PChar((FEngine as TVFSEngine).SavePath));
             GUIMutex.Release;
           end;
 
-- 
cgit v1.2.3