From 975df45304b48447b7464e05d5eecff00b4385dc Mon Sep 17 00:00:00 2001 From: rc-swag <58423624+rc-swag@users.noreply.github.com> Date: Wed, 12 Mar 2025 11:17:57 +1000 Subject: [PATCH] fix(windows): add bread crumbs to XMLRenderer --- windows/src/desktop/kmshell/render/XMLRenderer.pas | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/windows/src/desktop/kmshell/render/XMLRenderer.pas b/windows/src/desktop/kmshell/render/XMLRenderer.pas index cecb664b56..bd9ec66dd8 100644 --- a/windows/src/desktop/kmshell/render/XMLRenderer.pas +++ b/windows/src/desktop/kmshell/render/XMLRenderer.pas @@ -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( ''+ @@ -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