From 7e6491d3b49989f1b2a35161978fa496f736d641 Mon Sep 17 00:00:00 2001 From: Jim Blandy Date: Sat, 17 Oct 1992 22:11:23 +0000 Subject: [PATCH] * callint.c (Fcall_interactively): Change handling of 'e' spec; this_command_keys is now a vector. --- src/callint.c | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/src/callint.c b/src/callint.c index 87c5057cb40..c3375818ba8 100644 --- a/src/callint.c +++ b/src/callint.c @@ -400,14 +400,15 @@ Otherwise, this is done only if an arg is read using the minibuffer.") case 'e': /* The invoking event. */ /* Find the next parameterized event. */ while (next_event < this_command_key_count - && ! EVENT_HAS_PARAMETERS (this_command_keys[next_event])) + && ! (EVENT_HAS_PARAMETERS + (XVECTOR (this_command_keys)->contents[next_event]))) next_event++; if (next_event >= this_command_key_count) error ("%s must be bound to an event with parameters", (XTYPE (function) == Lisp_Symbol ? (char *) XSYMBOL (function)->name->data : "command")); - args[i] = this_command_keys[next_event++]; + args[i] = XVECTOR (this_command_keys)->contents[next_event++]; varies[i] = -1; break;