summaryrefslogtreecommitdiff
path: root/src/callint.c
diff options
context:
space:
mode:
authorJim Blandy <jimb@redhat.com>1992-10-17 22:11:23 +0000
committerJim Blandy <jimb@redhat.com>1992-10-17 22:11:23 +0000
commit7e6491d3b49989f1b2a35161978fa496f736d641 (patch)
tree142d77f5aebe56b7c43e8df95c7e4fefc8d801ea /src/callint.c
parent22cb290f6784094c33358316ba87d0025edc566d (diff)
downloademacs-7e6491d3b49989f1b2a35161978fa496f736d641.tar.gz
* callint.c (Fcall_interactively): Change handling of 'e' spec;
this_command_keys is now a vector.
Diffstat (limited to 'src/callint.c')
-rw-r--r--src/callint.c5
1 files 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;