chore: cleanup

This commit is contained in:
Marc Durdin 2020-07-09 10:21:42 +10:00
parent 56d7846a47
commit ccad703c82
3 changed files with 2 additions and 3 deletions

View file

@ -211,7 +211,7 @@ begin
cef.ShouldOpenRemoteUrlsInBrowser := False;
FRenderPage := 'downloadkeyboard';
Content_Render(False);
Content_Render;
inherited;
end;

View file

@ -276,7 +276,7 @@ procedure TfrmMain.Do_Content_Render(FRefreshKeyman: Boolean);
var
sharedDataIntf: IConfigMainSharedData;
sharedData: TConfigMainSharedData;
DefaultServersTag, s: string;
s: string;
begin
if FPageTag > 0 then
begin

View file

@ -238,7 +238,6 @@ procedure TAppHttpResponder.ProcessXMLPage(const s: string);
var
FXML: string;
PageTag: string;
DefaultServersTag: string;
begin
PageTag := RequestInfo.Params.Values['tag'];
if PageTag <> '' then