mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-29 08:31:35 -08:00
Code Issues Projects Releases Wiki Activity

(where_is_internal_1): If key is a cons, store the copy

Browse source 
in sequence.
This commit is contained in:
Kenichi Handa 2007-09-20 07:51:37 +00:00
parent 0a4bacdc2b
commit 43dfda2b48
1 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/keymap.c
View file

@ -2930,7 +2930,11 @@ where_is_internal_1 (key, binding, args, data)
Faset (sequence, last, make_number (XINT (key) | meta_modifier));
}
else
sequence = append_key (this, key);
{
if (CONSP (key))
key = Fcons (XCAR (key), XCDR (key));
sequence = append_key (this, key);
}
if (!NILP (where_is_cache))
{