From b4fe3b9243fb0f3d0b4bd54b63f0d880103d3cb7 Mon Sep 17 00:00:00 2001
From: handa <handa>
Date: Fri, 11 Jul 2008 11:45:05 +0000
Subject: [PATCH] (minput_open_im): Check if the arg NAME is not Mnil.

---
 src/input.c |    6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/src/input.c b/src/input.c
index cd67276..ad1ed4b 100644
--- 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);
-- 
1.7.10.4