diff options
author | Paul Eggert <eggert@cs.ucla.edu> | 2011-06-13 22:51:17 -0700 |
---|---|---|
committer | Paul Eggert <eggert@cs.ucla.edu> | 2011-06-13 22:51:17 -0700 |
commit | a1759b76246a21c7c07dc2ee00b8db792715104c (patch) | |
tree | a9960c85be2ce9a3f1686fc5ddd78b8edccb240a /src/callint.c | |
parent | d96be9fc873bfb4ff7d144c95c577537038e5e26 (diff) | |
download | emacs-a1759b76246a21c7c07dc2ee00b8db792715104c.tar.gz emacs-a1759b76246a21c7c07dc2ee00b8db792715104c.tar.bz2 emacs-a1759b76246a21c7c07dc2ee00b8db792715104c.zip |
* callint.c (Fcall_interactively): Don't use index var as event count.
Diffstat (limited to 'src/callint.c')
-rw-r--r-- | src/callint.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/callint.c b/src/callint.c index 2cc3a7cb537..29bb7ccc409 100644 --- a/src/callint.c +++ b/src/callint.c @@ -339,7 +339,7 @@ invoke it. If KEYS is omitted or nil, the return value of { Lisp_Object input; Lisp_Object funval = Findirect_function (function, Qt); - i = num_input_events; + size_t events = num_input_events; input = specs; /* Compute the arg values using the user's expression. */ GCPRO2 (input, filter_specs); @@ -347,7 +347,7 @@ invoke it. If KEYS is omitted or nil, the return value of CONSP (funval) && EQ (Qclosure, XCAR (funval)) ? Qt : Qnil); UNGCPRO; - if (i != num_input_events || !NILP (record_flag)) + if (events != num_input_events || !NILP (record_flag)) { /* We should record this command on the command history. */ Lisp_Object values; |