diff options
author | Paul Eggert <eggert@cs.ucla.edu> | 2011-03-16 00:24:57 -0700 |
---|---|---|
committer | Paul Eggert <eggert@cs.ucla.edu> | 2011-03-16 00:24:57 -0700 |
commit | a3e8cbda22e76cc2f5352638256cdc0033c00357 (patch) | |
tree | 7d72ab73eeefaad086b7012870ec88ea5c784343 /src/callint.c | |
parent | b1349114e9a58791ee0d5e505e05633cc91293f3 (diff) | |
download | emacs-a3e8cbda22e76cc2f5352638256cdc0033c00357.tar.gz |
* callint.c (Fcall_interactively): Rename locals to avoid shadowing.
Diffstat (limited to 'src/callint.c')
-rw-r--r-- | src/callint.c | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/src/callint.c b/src/callint.c index af9ee5bb9bd..5ec916a5b8a 100644 --- a/src/callint.c +++ b/src/callint.c @@ -408,25 +408,25 @@ invoke it. If KEYS is omitted or nil, the return value of string++; else if (*string == '@') { - Lisp_Object event, tem; + Lisp_Object event, w; event = (next_event < key_count ? AREF (keys, next_event) : Qnil); if (EVENT_HAS_PARAMETERS (event) - && (tem = XCDR (event), CONSP (tem)) - && (tem = XCAR (tem), CONSP (tem)) - && (tem = XCAR (tem), WINDOWP (tem))) + && (w = XCDR (event), CONSP (w)) + && (w = XCAR (w), CONSP (w)) + && (w = XCAR (w), WINDOWP (w))) { - if (MINI_WINDOW_P (XWINDOW (tem)) - && ! (minibuf_level > 0 && EQ (tem, minibuf_window))) + if (MINI_WINDOW_P (XWINDOW (w)) + && ! (minibuf_level > 0 && EQ (w, minibuf_window))) error ("Attempt to select inactive minibuffer window"); /* If the current buffer wants to clean up, let it. */ if (!NILP (Vmouse_leave_buffer_hook)) call1 (Vrun_hooks, Qmouse_leave_buffer_hook); - Fselect_window (tem, Qnil); + Fselect_window (w, Qnil); } string++; } @@ -679,7 +679,7 @@ invoke it. If KEYS is omitted or nil, the return value of int first = 1; do { - Lisp_Object tem; + Lisp_Object str; if (! first) { message ("Please enter a number."); @@ -687,13 +687,13 @@ invoke it. If KEYS is omitted or nil, the return value of } first = 0; - tem = Fread_from_minibuffer (callint_message, + str = Fread_from_minibuffer (callint_message, Qnil, Qnil, Qnil, Qnil, Qnil, Qnil); - if (! STRINGP (tem) || SCHARS (tem) == 0) + if (! STRINGP (str) || SCHARS (str) == 0) args[i] = Qnil; else - args[i] = Fread (tem); + args[i] = Fread (str); } while (! NUMBERP (args[i])); } |