forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

fix #464 - searching multiline regexes does not work

This commit is contained in:
Basile Burg 2019-04-26 00:31:41 +02:00
parent 03a33c2137
commit 779edd9fe5
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/u_search.pas
View File

@ -309,7 +309,7 @@ function TSearchWidget.getOptions: TSynSearchOptions;
begin begin
result := []; result := [];
if chkRegex.Checked then if chkRegex.Checked then
result += [ssoRegExpr]; result += [ssoRegExpr, ssoRegExprMultiLine];
if chkWWord.Checked then if chkWWord.Checked then
result += [ssoWholeWord]; result += [ssoWholeWord];
if chkBack.Checked then if chkBack.Checked then
@ -468,6 +468,7 @@ begin
search.Sensitive := ssoMatchCase in options; search.Sensitive := ssoMatchCase in options;
search.Whole := ssoWholeWord in options; search.Whole := ssoWholeWord in options;
search.RegularExpressions:= ssoRegExpr in options; search.RegularExpressions:= ssoRegExpr in options;
search.RegExprMultiLine:=ssoRegExpr in options;
search.Pattern:=fToFind; search.Pattern:=fToFind;
if (fFindScope = scSel) and fDoc.SelAvail then if (fFindScope = scSel) and fDoc.SelAvail then
begin begin