Mercurial > emacs
changeset 71835:838f4260201e
(access_keymap_keyremap): Use ARRAYP.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Wed, 12 Jul 2006 13:19:04 +0000 |
| parents | bf40c8c83e7a |
| children | 838fd2b04ce0 |
| files | src/keyboard.c |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/keyboard.c Wed Jul 12 13:17:29 2006 +0000 +++ b/src/keyboard.c Wed Jul 12 13:19:04 2006 +0000 @@ -8384,7 +8384,7 @@ /* Handle a symbol whose function definition is a keymap or an array. */ if (SYMBOLP (next) && !NILP (Ffboundp (next)) - && (!NILP (Farrayp (XSYMBOL (next)->function)) + && (ARRAYP (XSYMBOL (next)->function) || KEYMAPP (XSYMBOL (next)->function))) next = XSYMBOL (next)->function;