Mercurial > emacs
diff src/keymap.c @ 71836:838fd2b04ce0
(Fdefine_key, Flookup_key): Use CHECK_VECTOR_OR_STRING.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Wed, 12 Jul 2006 13:19:15 +0000 |
| parents | e1a064810f6f |
| children | df96acbe2970 b19aaf4ab0ee |
line wrap: on
line diff
--- a/src/keymap.c Wed Jul 12 13:19:04 2006 +0000 +++ b/src/keymap.c Wed Jul 12 13:19:15 2006 +0000 @@ -1138,8 +1138,7 @@ GCPRO3 (keymap, key, def); keymap = get_keymap (keymap, 1, 1); - if (!VECTORP (key) && !STRINGP (key)) - key = wrong_type_argument (Qarrayp, key); + CHECK_VECTOR_OR_STRING (key); length = XFASTINT (Flength (key)); if (length == 0) @@ -1249,8 +1248,7 @@ GCPRO2 (keymap, key); keymap = get_keymap (keymap, 1, 1); - if (!VECTORP (key) && !STRINGP (key)) - key = wrong_type_argument (Qarrayp, key); + CHECK_VECTOR_OR_STRING (key); length = XFASTINT (Flength (key)); if (length == 0)