paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-12 05:36:22 +02:00
Code Issues Packages Projects Releases Wiki Activity

SynEdit: Minor optimization.

Browse Source 
git-svn-id: trunk@30052 -
This commit is contained in:
juha 2011-03-28 10:05:11 +00:00
parent 6ae245e8c8
commit 3d82f1d685
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/synedit/synedit.pp
View File

@ -7208,9 +7208,7 @@ begin
// user has been prompted and has requested to silently replace all // user has been prompted and has requested to silently replace all
// so turn off prompting // so turn off prompting
if nAction = raReplaceAll then begin if nAction = raReplaceAll then begin
if not bReplaceAll then begin bReplaceAll := True;
bReplaceAll := TRUE;
end;
bPrompt := False; bPrompt := False;
end; end;
// replace text // replace text