Delphi Compatibility

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1802 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
inoussa
2011-08-16 12:41:05 +00:00
parent ca7613fadd
commit 1e9af50ca1

View File

@ -143,8 +143,6 @@ end;
procedure TwstListener.SetOnNotifyMessage(const AValue : TListnerNotifyMessage);
begin
if (FOnNotifyMessage = AValue) then
exit;
FOnNotifyMessage := AValue;
end;