diff options
| author | Kim F. Storm | 2006-07-12 13:19:04 +0000 |
|---|---|---|
| committer | Kim F. Storm | 2006-07-12 13:19:04 +0000 |
| commit | 592c0e80abf8f67b287f95e258b2ca76bdbc70d7 (patch) | |
| tree | e6adc6e6f60d7f83bc45fbcbaea8c7683fb74912 | |
| parent | 7fee0b516868ab4cdd24f69551ceb9870c2f4c67 (diff) | |
| download | emacs-592c0e80abf8f67b287f95e258b2ca76bdbc70d7.tar.gz emacs-592c0e80abf8f67b287f95e258b2ca76bdbc70d7.zip | |
(access_keymap_keyremap): Use ARRAYP.
| -rw-r--r-- | src/keyboard.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/keyboard.c b/src/keyboard.c index 5e808739d6b..6bd9d754c60 100644 --- a/src/keyboard.c +++ b/src/keyboard.c | |||
| @@ -8384,7 +8384,7 @@ access_keymap_keyremap (map, key, prompt, do_funcall) | |||
| 8384 | /* Handle a symbol whose function definition is a keymap | 8384 | /* Handle a symbol whose function definition is a keymap |
| 8385 | or an array. */ | 8385 | or an array. */ |
| 8386 | if (SYMBOLP (next) && !NILP (Ffboundp (next)) | 8386 | if (SYMBOLP (next) && !NILP (Ffboundp (next)) |
| 8387 | && (!NILP (Farrayp (XSYMBOL (next)->function)) | 8387 | && (ARRAYP (XSYMBOL (next)->function) |
| 8388 | || KEYMAPP (XSYMBOL (next)->function))) | 8388 | || KEYMAPP (XSYMBOL (next)->function))) |
| 8389 | next = XSYMBOL (next)->function; | 8389 | next = XSYMBOL (next)->function; |
| 8390 | 8390 | ||