Francois Gouget : testbot/SetWinLocale: Windows omits the country for some locales.
Alexandre Julliard
julliard at winehq.org
Tue Jan 11 15:42:55 CST 2022
Module: tools
Branch: master
Commit: b2f1c4ab239a65a1c845270d64662ce0041563c4
URL: https://source.winehq.org/git/tools.git/?a=commit;h=b2f1c4ab239a65a1c845270d64662ce0041563c4
Author: Francois Gouget <fgouget at codeweavers.com>
Date: Tue Jan 11 19:21:07 2022 +0100
testbot/SetWinLocale: Windows omits the country for some locales.
For instance one finds the hi-IN information in the "User Profile\hi"
subkey.
Signed-off-by: Francois Gouget <fgouget at codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard at winehq.org>
---
testbot/bin/SetWinLocale | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/testbot/bin/SetWinLocale b/testbot/bin/SetWinLocale
index b2da673..a6e95a2 100755
--- a/testbot/bin/SetWinLocale
+++ b/testbot/bin/SetWinLocale
@@ -663,6 +663,12 @@ sub GetWinKeyboardIds($)
# Look for that locale's keyboard id.
# Its first component is the locale's LCID.
my $Values = RegGetValues("$HKCU_USER_PROFILE\\$Locale", "*:*");
+ if (!%$Values)
+ {
+ my $Lang = $Locale;
+ $Lang =~ s/-.*$//;
+ $Values = RegGetValues("$HKCU_USER_PROFILE\\$Lang", "*:*");
+ }
foreach my $VName (keys %$Values)
{
next if ($VName !~ /^[0-9A-F]{4}:/);
More information about the wine-cvs
mailing list