mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-28 10:02:14 +00:00
Code Issues Projects Releases Packages Wiki Activity

FIX: Find text with default encoding #2

Browse source
This commit is contained in:
Alexander Koblov 2019-06-26 17:34:55 +00:00
commit b630e042eb
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/ufindthread.pas
View file

@ -117,9 +117,6 @@ begin
end
else begin
TextEncoding := NormalizeEncoding(TextEncoding);
if TextEncoding = EncodingDefault then begin
TextEncoding := GetDefaultTextEncoding;
end;
if TextRegExp then FRegExpr := TRegExpr.Create(TextEncoding);
FindText := ConvertEncoding(FindText, EncodingUTF8, TextEncoding);
ReplaceText := ConvertEncoding(ReplaceText, EncodingUTF8, TextEncoding);
@ -133,6 +130,9 @@ begin
end
else if (CaseSensitive = False) then
begin
if TextEncoding = EncodingDefault then begin
TextEncoding := GetDefaultTextEncoding;
end;
if ((TextEncoding = EncodingUTF8) or (TextEncoding = EncodingUTF8BOM)) then
FTextSearchType:= tsUtf8
else if (TextEncoding = EncodingUTF16LE) then