mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-28 00:03:47 +02:00
IDE: small optimization
git-svn-id: trunk@29588 -
This commit is contained in:
parent
bd44a633e1
commit
fa186c4933
@ -132,7 +132,7 @@ begin
|
||||
add:=m.MsgType in [etNote, etHint, etWarning];
|
||||
|
||||
if add and (srch<>'') then
|
||||
add:=UTF8Pos(srch, UTF8UpperCase(m.GetUserText))>0;
|
||||
add:=System.Pos(srch, UTF8UpperCase(m.GetUserText))>0;
|
||||
|
||||
if add then
|
||||
begin
|
||||
|
Loading…
Reference in New Issue
Block a user