Move decoding of locale info from Lisp to C.

* src/w32proc.c (Fw32_get_locale_info): Decode long form of locale name.

* lisp/w32-fns.el (w32-list-locales): Revert part of 2008-10-17 change;
  decoding of long locale info is now done in `w32-get-locale-info'.

2 files changed, 5 insertions, 1 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 14d02758271..453c61bbbb2 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,9 @@
 2008-12-11  Juanma Barranquero  <lekktu@gmail.com>
 
+        * w32proc.c (Fw32_get_locale_info): Decode long form of locale name.
+
+2008-12-11  Juanma Barranquero  <lekktu@gmail.com>
+
         * process.c (Fsystem_process_attributes, syms_of_process):
         Fix typo in name of Ssystem_process_attributes.
         Reported by Ulrich Mueller <ulm@kph.uni-mainz.de>.
diff --git a/src/w32proc.c b/src/w32proc.c
index 867ceb60f37..3e5dcd29325 100644
--- a/src/w32proc.c
+++ b/src/w32proc.c
@@ -1983,7 +1983,7 @@ If LCID (a 16-bit number) is not a valid locale, the result is nil.  */)
                                 LOCALE_SLANGUAGE | LOCALE_USE_CP_ACP,
                                 full_name, sizeof (full_name));
       if (got_full)
-        return build_string (full_name);
+        return DECODE_SYSTEM (build_string (full_name));
     }
   else if (NUMBERP (longform))
     {