Mercurial > emacs

changeset 1425:2c156e9908ad

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* callint.c (Fcall_interactively): Change handling of 'e' spec; this_command_keys is now a vector.
author Jim Blandy <jimb@redhat.com>
date Sat, 17 Oct 1992 22:11:23 +0000
parents 892242701cba
children 67fd35416ba3
files src/callint.c
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/callint.c	Sat Oct 17 22:07:49 1992 +0000
+++ b/src/callint.c	Sat Oct 17 22:11:23 1992 +0000
@@ -400,14 +400,15 @@
 	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;