*** empty log message ***

[m17n/m17n-test.git] / m17n-imconf.c

diff --git a/m17n-imconf.c b/m17n-imconf.c
index 90eb87f..24db13f 100644 (file)
--- a/m17n-imconf.c
+++ b/m17n-imconf.c
@@ -177,6 +177,9 @@ call_config_common (int (*func) (MSymbol, MSymbol, MSymbol, MPlist *),
     ERROR (error_invalid_arg);
   if (TAILP (arg))
     arg = NULL;
+  else if (mplist_key (arg) == Mplist
+          && mplist_key ((MPlist *) mplist_value (arg)) == Mnil)
+    arg = (MPlist *) mplist_value (arg);
   if (func (lang, name, target, arg) < 0)
     ERROR (error_command_fail);
   return NULL;