[ros-diffs] [weiden] 15205: use proper scancode to create upper-case hex numbers directly

use proper scancode to create upper-case hex numbers directly
Modified: trunk/reactos/lib/cpl/intl/locale.c
  _____

Modified: trunk/reactos/lib/cpl/intl/locale.c
--- trunk/reactos/lib/cpl/intl/locale.c	2005-05-11 09:56:24 UTC (rev
15204)
+++ trunk/reactos/lib/cpl/intl/locale.c	2005-05-11 13:20:34 UTC (rev
15205)
@@ -95,6 +95,7 @@

HKEY langKey;
    DWORD ret;
    TCHAR value[9];
+	DWORD lenvalue;

ret = RegOpenKeyW(HKEY_CURRENT_USER, L"Control
Panel\International", &localeKey);

@@ -105,9 +106,10 @@
    	return;
    }

-	wsprintf(value, L"%04x", (DWORD)lcid);
+	wsprintf(value, L"%04X", (DWORD)lcid);
+	lenvalue = wcslen(value);

-	RegSetValueExW(localeKey, L"Locale", 0, REG_SZ, (BYTE *)
_wcsupr(value), sizeof(value));
+	RegSetValueExW(localeKey, L"Locale", 0, REG_SZ, (BYTE *)value,
lenvalue * sizeof(WCHAR));
    RegCloseKey(localeKey);

// Set language
@@ -116,8 +118,8 @@
    if (ret != ERROR_SUCCESS)
    	return;

-	RegSetValueExW(langKey, L"Default", 0, REG_SZ, (BYTE
*)_wcsupr(value), sizeof(value));
-	RegSetValueExW(langKey, L"InstallLanguage", 0, REG_SZ, (BYTE *)
_wcsupr(value), sizeof(value));
+	RegSetValueExW(langKey, L"Default", 0, REG_SZ, (BYTE *)value,
lenvalue * sizeof(WCHAR));
+	RegSetValueExW(langKey, L"InstallLanguage", 0, REG_SZ, (BYTE
*)value, lenvalue * sizeof(WCHAR));
    RegCloseKey(langKey);
 }