summaryrefslogtreecommitdiff
path: root/lisp/international
diff options
context:
space:
mode:
authorJuri Linkov <juri@jurta.org>2006-09-03 14:01:01 +0000
committerJuri Linkov <juri@jurta.org>2006-09-03 14:01:01 +0000
commit35f111baba762a476b303076a848a335d1ac2f85 (patch)
treea6c4550a3c5bf977eca98ab0ba94036f82d057fb /lisp/international
parent6a8c7cfe2059bc6e566675679d9dbbcdfd07bdb0 (diff)
downloademacs-35f111baba762a476b303076a848a335d1ac2f85.tar.gz
(quail-defrule-internal): Add a check if a key is a vector.
Diffstat (limited to 'lisp/international')
-rw-r--r--lisp/international/quail.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index b21d2623d80..fceebf64f22 100644
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -1095,7 +1095,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))
+ (if (not (or (stringp key) (vectorp key)))
(error "Invalid Quail key `%s'" key))
(if (not (or (numberp trans) (stringp trans) (vectorp trans)
(consp trans)