From 779edd9fe583ee2eb2718037a43b4b45dece331e Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.b@gmx.com>
Date: Fri, 26 Apr 2019 00:31:41 +0200
Subject: [PATCH] fix #464 - searching multiline regexes does not work

---
 src/u_search.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/u_search.pas b/src/u_search.pas
index f7d31dd5..6f960f6a 100644
--- a/src/u_search.pas
+++ b/src/u_search.pas
@@ -309,7 +309,7 @@ function TSearchWidget.getOptions: TSynSearchOptions;
 begin
   result := [];
   if chkRegex.Checked     then
-    result += [ssoRegExpr];
+    result += [ssoRegExpr, ssoRegExprMultiLine];
   if chkWWord.Checked     then
     result += [ssoWholeWord];
   if chkBack.Checked      then
@@ -468,6 +468,7 @@ begin
     search.Sensitive := ssoMatchCase in options;
     search.Whole := ssoWholeWord in options;
     search.RegularExpressions:= ssoRegExpr in options;
+    search.RegExprMultiLine:=ssoRegExpr in options;
     search.Pattern:=fToFind;
     if (fFindScope = scSel) and fDoc.SelAvail then
     begin