From 4478095f5105100267ac93535cf5f8d5e3fe0333 Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Mon, 15 Jun 2015 23:31:57 +0000
Subject: [PATCH] IDE: Share options between FindInFiles and FindReplace
 dialogs. Issue #28302, patch from Ondrej Pokorny.

git-svn-id: trunk@49339 -
---
 ide/findinfilesdlg.pas | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/ide/findinfilesdlg.pas b/ide/findinfilesdlg.pas
index a6eadad1cd..52a8587aa5 100644
--- a/ide/findinfilesdlg.pas
+++ b/ide/findinfilesdlg.pas
@@ -308,6 +308,9 @@ begin
     Result:=GetCurrentDirUTF8;
 end;
 
+const
+  SharedOptions = [ssoWholeWord,ssoEntireScope,ssoRegExpr,ssoRegExprMultiLine];
+
 procedure TLazFindInFilesDialog.LoadHistory;
 
   procedure AssignToComboBox(AComboBox: TComboBox; Strings: TStrings);
@@ -363,6 +366,7 @@ begin
   // show last used file masks
   AssignToComboBox(FileMaskComboBox, InputHistories.FindInFilesMaskHistory);
   Options := InputHistories.FindInFilesSearchOptions;
+  SynSearchOptions := InputHistories.FindOptions * SharedOptions;//share basic options with FindReplaceDlg
 end;
 
 procedure TLazFindInFilesDialog.SaveHistory;
@@ -377,6 +381,7 @@ begin
     InputHistories.AddToFindInFilesPathHistory(Dir);
   InputHistories.AddToFindInFilesMaskHistory(FileMaskComboBox.Text);
   InputHistories.FindInFilesSearchOptions:=Options;
+  InputHistories.FindOptions := InputHistories.FindOptions - SharedOptions + (SynSearchOptions*SharedOptions);//share basic options with FindReplaceDlg
   InputHistories.Save;
 end;