diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-08-07 06:40:55 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-08-07 06:40:55 +0000 |
| commit | 1ae2097f5083eaf491f5a2c1efd19b712b6c3c5a (patch) | |
| tree | 912d8907e40e26338f234d4f469ac30a98da2da5 /src/keymap.c | |
| parent | 2e16580f125edd2e7f63c8fc2a2489245eaf8c1c (diff) | |
| download | emacs-1ae2097f5083eaf491f5a2c1efd19b712b6c3c5a.tar.gz | |
(Faccessible_keymaps): Fix previous change.
Diffstat (limited to 'src/keymap.c')
| -rw-r--r-- | src/keymap.c | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/src/keymap.c b/src/keymap.c index 7ad4bacc255..bad22160a9c 100644 --- a/src/keymap.c +++ b/src/keymap.c @@ -1173,10 +1173,12 @@ then the value includes only maps for prefixes that start with PREFIX.") that prefix, so we don't waste time considering other prefixes. */ Lisp_Object tem; tem = Flookup_key (startmap, prefix, Qt); - /* If PREFIX is reasonable, Flookup_key should give a keymap or nil. - For any other value it is ok to get an error here. */ + /* Flookup_key may give us nil, or a number, + if the prefix is not defined in this particular map. + It might even give us a list that isn't a keymap. */ + tem = get_keymap_1 (tem, 0, 0); if (!NILP (tem)) - maps = Fcons (Fcons (prefix, get_keymap (tem)), Qnil); + maps = Fcons (Fcons (prefix, tem), Qnil); else return Qnil; } |