diff options
author | Jim Blandy <jimb@redhat.com> | 1992-10-17 22:11:23 +0000 |
---|---|---|
committer | Jim Blandy <jimb@redhat.com> | 1992-10-17 22:11:23 +0000 |
commit | 7e6491d3b49989f1b2a35161978fa496f736d641 (patch) | |
tree | 142d77f5aebe56b7c43e8df95c7e4fefc8d801ea /src/callint.c | |
parent | 22cb290f6784094c33358316ba87d0025edc566d (diff) | |
download | emacs-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.c | 5 |
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; |