Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
1ae2097f
Commit
1ae2097f
authored
Aug 07, 1994
by
Richard M. Stallman
Browse files
(Faccessible_keymaps): Fix previous change.
parent
2e16580f
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
5 additions
and
3 deletions
+5
-3
src/keymap.c
src/keymap.c
+5
-3
No files found.
src/keymap.c
View file @
1ae2097f
...
...
@@ -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
;
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment