diff --git a/ide/etfpcmsgparser.pas b/ide/etfpcmsgparser.pas index ed5a1c0fc1..bbfa65fa4e 100644 --- a/ide/etfpcmsgparser.pas +++ b/ide/etfpcmsgparser.pas @@ -2433,10 +2433,9 @@ begin Value1:=''; Value2:=''; if Msg=nil then exit(false); - if Msg.MsgID<>MsgId then begin - if Msg.MsgID<>0 then exit(false); - if Msg.SubTool<>SubToolFPC then exit(false); - end; + if Msg.SubTool<>SubToolFPC then exit(false); + if (Msg.MsgID<>MsgId) + and (Msg.MsgID<>0) then exit(false); Result:=true; aFPCParser:=GetFPCParser(Msg); if aFPCParser=nil then exit;