mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-05-03 11:41:41 -07:00
(Flookup_key): Fixed problem in 2001-12-28 patch:
The validation of the event type was too strict as it didn't allow string events; buffer names are used in bindings for menu-bar-select-buffer (see `menu-bar-update-buffers').
This commit is contained in:
parent
a8959ac2a3
commit
5f24537118
2 changed files with 10 additions and 1 deletions
|
|
@ -1,3 +1,10 @@
|
|||
2002-02-24 Kim F. Storm <storm@cua.dk>
|
||||
|
||||
* keymap.c (Flookup_key): Fixed problem in 2001-12-28 patch:
|
||||
The validation of the event type was too strict as it didn't
|
||||
allow string events; buffer names are used in bindings for
|
||||
menu-bar-select-buffer (see `menu-bar-update-buffers').
|
||||
|
||||
2002-02-23 Kim F. Storm <storm@cua.dk>
|
||||
|
||||
The following changes rework my patch of 2002-02-06 which
|
||||
|
|
|
|||
|
|
@ -1142,7 +1142,9 @@ recognize the default bindings, just as `read-key-sequence' does. */)
|
|||
if (XINT (c) & 0x80 && STRINGP (key))
|
||||
XSETINT (c, (XINT (c) | meta_modifier) & ~0x80);
|
||||
|
||||
if (!INTEGERP (c) && !SYMBOLP (c) && !CONSP (c))
|
||||
/* Allow string since binding for `menu-bar-select-buffer'
|
||||
includes the buffer name in the key sequence. */
|
||||
if (!INTEGERP (c) && !SYMBOLP (c) && !CONSP (c) && !STRINGP (c))
|
||||
error ("Key sequence contains invalid event");
|
||||
|
||||
cmd = access_keymap (keymap, c, t_ok, 0, 1);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue