[uim commit] r4949 - trunk/uim

[codesite-noreply]

Author: yamakenz
Date: Mon Sep 10 05:07:33 2007
New Revision: 4949

Modified:
   trunk/uim/m17nlib.c

Log:
* uim/m17nlib.c
  - (get_input_method_lang): Return "*" instead of invalid
    language code "t" for uim to complement the change of r4948


Modified: trunk/uim/m17nlib.c
==============================================================================
--- trunk/uim/m17nlib.c (original)
+++ trunk/uim/m17nlib.c Mon Sep 10 05:07:33 2007
@@ -459,10 +459,17 @@
 static uim_lisp
 get_input_method_lang(uim_lisp nth_)
 {
-  int nth = C_INT(nth_);
+  int nth;
+  const char *lang;
 
-  if (nth < nr_input_methods)
-    return MAKE_STR(im_array[nth].lang);
+  nth = C_INT(nth_);
+
+  if (nth < nr_input_methods) {
+    lang = im_array[nth].lang;
+    /* "*" is wildcard language. See langgroup-covers? and
+     * find-im-for-locale. */
+    return MAKE_STR((strcmp(lang, "t") == 0) ? "*" : lang);
+  }
 
   return uim_scm_f();
 }