# HG changeset patch # User Juri Linkov # Date 1157292019 0 # Node ID ab32c6acd9f2f747031f783cf143f3152c0e3507 # Parent 187f38ad8b4e0170208f2fa74fc1068eab5e55b4 (quail-defrule-internal): Add a check if a key is a vector. diff -r 187f38ad8b4e -r ab32c6acd9f2 lisp/international/quail.el --- a/lisp/international/quail.el Sat Sep 02 23:44:59 2006 +0000 +++ b/lisp/international/quail.el Sun Sep 03 14:00:19 2006 +0000 @@ -1095,7 +1095,7 @@ Optional 6th arg PROPS is a property list annotating TRANS. See the function `quail-define-rules' for the detail." - (if (null (stringp key)) + (if (not (or (stringp key) (vectorp key))) (error "Invalid Quail key `%s'" key)) (if (not (or (numberp trans) (stringp trans) (vectorp trans) (consp trans)