fix linux build broken

This commit is contained in:
Basile Burg 2016-11-26 02:44:52 +01:00
parent ca84dffb31
commit bf3d71a44b
No known key found for this signature in database
GPG Key ID: 1868039F415CB8CF
1 changed files with 6 additions and 0 deletions

View File

@ -396,6 +396,7 @@ type
procedure optionsChangesApplied(sender: TObject);
procedure menuDeclare(item: TMenuItem);
procedure menuUpdate(item: TMenuItem);
function menuHasItems: boolean;
//
procedure disableEditor;
procedure setState(value: TGdbState);
@ -1118,6 +1119,11 @@ begin
end;
end;
function TCEGdbWidget.menuHasItems: boolean;
begin
exit(true);
end;
procedure TCEGdbWidget.optionsChangesApplied(sender: TObject);
begin
fUpdateMenu:=true;