erabo/spiegel-keyman
1
0
Fork 0
mirror of https://github.com/keymanapp/keyman.git synced 2026-09-23 08:07:40 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 3

fix(windows): add bread crumbs to XMLRenderer

Browse source
This commit is contained in:
rc-swag 2025-03-12 11:17:57 +10:00
parent 0a8df9480f
commit 975df45304
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
windows/src/desktop/kmshell/render/XMLRenderer.pas
View file

@ -107,6 +107,7 @@ uses
UFixupMissingFile,
UILanguages,
Keyman.Configuration.System.UmodWebHttpServer,
Keyman.System.KeymanSentryClient,
Unicode,
utildir,
utilhttp,
@ -200,7 +201,7 @@ begin
FOutput := TStringList.Create;
try
LanguageCode := (kmcom.Control as IKeymanCustomisationAccess).KeymanCustomisation.CustMessages.LanguageCode;
TKeymanSentryClient.Breadcrumb('ui.configuration', ClassName +' LanguagueCode: '+LanguageCode, 'file-io');
FOutput.Add(
'<?xml version="1.0" encoding="utf-8"?>'+
@ -229,6 +230,7 @@ begin
if not FileExists(FTemplatePath + FRenderTemplate) then
begin
try
TKeymanSentryClient.Breadcrumb('ui.configuration', ClassName+' Call FixupMissingFile for ' +FTemplatePath +FRenderTemplate, 'file-io');
FixupMissingFile(FTemplatePath + FRenderTemplate);
except
on E:EFixupMissingFile do
@ -237,6 +239,7 @@ begin
end;
try
TKeymanSentryClient.Breadcrumb('ui.configuration', ClassName+' Loading XSLT '+FTemplatePath +FRenderTemplate, 'file-io');
xml.LoadFromFile(FTemplatePath + FRenderTemplate);
except
on E: Exception do