(minput_open_im): Check if the arg NAME is not Mnil.

diff --git a/src/input.c b/src/input.c
index cd67276..ad1ed4b 100644 (file)
--- a/src/input.c
+++ b/src/input.c
@@ -4321,7 +4321,11 @@ minput_open_im (MSymbol language, MSymbol name, void *arg)
   MDEBUG_PRINT2 ("  [IM] opening (%s %s) ... ",
                 msymbol_name (language), msymbol_name (name));
   if (language)
-    driver = minput_driver;
+    {
+      if (name == Mnil)
+       MERROR (MERROR_IM, NULL);
+      driver = minput_driver;
+    }
   else
     {
       driver = (MInputDriver *) msymbol_get (name, Minput_driver);