diff --git a/windows/src/engine/tsysinfo/si_language.pas b/windows/src/engine/tsysinfo/si_language.pas
index fcc2e03940..27bcf99ed4 100644
--- a/windows/src/engine/tsysinfo/si_language.pas
+++ b/windows/src/engine/tsysinfo/si_language.pas
@@ -145,6 +145,8 @@ begin
 
   regnode := xmlAddChild(subnode,'CurrentUser');
   AddRegistry(regnode, HKEY_CURRENT_USER, SRegKey_KeyboardLayout_CU);
+  AddRegistry(regnode, HKEY_CURRENT_USER, 'Software\Microsoft\CTF');
+  AddRegistry(regnode, HKEY_CURRENT_USER, SRegKey_ControlPanelInternationalUserProfile);
   subnode := xmlAddChild(node,'Uniscribe');
   AddFileVersion(subnode, GetFolderPath(CSIDL_SYSTEM) + 'usp10.dll');
   str := TStringList.Create;