From fed8b5e89cbdbaa7a9ea5427e6580ccf40409e57 Mon Sep 17 00:00:00 2001
From: Tomas Bzatek <tbzatek@users.sourceforge.net>
Date: Wed, 23 Sep 2009 17:10:06 +0200
Subject: Implement find text combo history in Search dialog

---
 UCore.pas | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'UCore.pas')

diff --git a/UCore.pas b/UCore.pas
index afe8b10..b69b055 100644
--- a/UCore.pas
+++ b/UCore.pas
@@ -252,7 +252,7 @@ var LeftLocalEngine, RightLocalEngine: TPanelEngine;
     LeftTabSortTypes, RightTabSortTypes: TList;
     FMainEscPressed: boolean;
     UsedTempPaths: TStringList;
-    SelectHistory, SearchHistory: TStringList;
+    SelectHistory, SearchHistory, SearchTextHistory: TStringList;
     QuickConnectHistory: TStringList;
 
 (********************************************************************************************************************************)
@@ -3057,6 +3057,7 @@ initialization
   UsedTempPaths := TStringList.Create;
   SelectHistory := TStringList.Create;
   SearchHistory := TStringList.Create;
+  SearchTextHistory := TStringList.Create;
 finalization
   ClearListData(LeftPanelData);
   ClearListData(RightPanelData);
@@ -3075,4 +3076,5 @@ finalization
   UsedTempPaths.Free;
   SelectHistory.Free;
   SearchHistory.Free;
+  SearchTextHistory.Free;
 end.
-- 
cgit v1.2.3