From: Juri Linkov <juri@jurta.org>
Date: Sat, 2 Sep 2006 23:31:33 +0000 (+0000)
Subject: (quail-defrule-internal): Add missing `error' call for null key.
X-Git-Tag: emacs-pretest-22.0.90~784
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=00baf2eb088424793af2388ae37cf38409860bc3;p=emacs.git

(quail-defrule-internal): Add missing `error' call for null key.
---

diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index 3998764957e..b21d2623d80 100644
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -1096,7 +1096,7 @@ Optional 5th arg DECODE-MAP is a Quail decode map.
 Optional 6th arg PROPS is a property list annotating TRANS.  See the
 function `quail-define-rules' for the detail."
   (if (null (stringp key))
-      "Invalid Quail key `%s'" key)
+      (error "Invalid Quail key `%s'" key))
   (if (not (or (numberp trans) (stringp trans) (vectorp trans)
 	       (consp trans)
 	       (symbolp trans)