mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-12 00:38:13 +02:00
simplewebserver: fixed frame inheritance
This commit is contained in:
parent
b737901aa5
commit
479c0c04f4
@ -281,7 +281,7 @@ end;
|
||||
|
||||
class function TSimpleWebSrvOptsFrame.SupportedOptionsClass: TAbstractIDEOptionsClass;
|
||||
begin
|
||||
Result:=TAbstractIDEEnvironmentOptions;
|
||||
Result:=IDEEditorGroups.GetByIndex(GroupEnvironment)^.GroupClass;
|
||||
end;
|
||||
|
||||
procedure TSimpleWebSrvOptsFrame.WriteSettings(AOptions: TAbstractIDEOptions);
|
||||
|
Loading…
Reference in New Issue
Block a user