diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2003-05-17 21:17:45 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2003-05-17 21:17:45 +0000 |
| commit | f1321dc307e63c17ce838e0b32e2708fd351f1df (patch) | |
| tree | 0bda7c11a457c162a6b8c609d30c8b8984aafdba /src/callint.c | |
| parent | 7c0a9c8f30222f112d9ee9e35527131d10e0bdc9 (diff) | |
| download | emacs-f1321dc307e63c17ce838e0b32e2708fd351f1df.tar.gz | |
(Fselect_window): Add optional arg `norecord'.
Diffstat (limited to 'src/callint.c')
| -rw-r--r-- | src/callint.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/callint.c b/src/callint.c index f80f3c62027..4edb4201fa4 100644 --- a/src/callint.c +++ b/src/callint.c @@ -1,5 +1,5 @@ /* Call a Lisp function interactively. - Copyright (C) 1985, 86, 93, 94, 95, 1997, 2000, 2002 + Copyright (C) 1985, 86, 93, 94, 95, 1997, 2000, 02, 2003 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -379,7 +379,7 @@ supply if the command inquires which events were used to invoke it. */) if (i != num_input_events || !NILP (record_flag)) { /* We should record this command on the command history. */ - Lisp_Object values, car; + Lisp_Object values; /* Make a copy of the list of values, for the command history, and turn them into things we can eval. */ values = quotify_args (Fcopy_sequence (specs)); @@ -456,7 +456,7 @@ supply if the command inquires which events were used to invoke it. */) if (!NILP (Vmouse_leave_buffer_hook)) call1 (Vrun_hooks, Qmouse_leave_buffer_hook); - Fselect_window (event); + Fselect_window (event, Qnil); } string++; } |