Commit adf6a429 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(read_avail_input): Call Fdelete_terminal.

parent 174105f7
2008-02-12 Stefan Monnier <monnier@iro.umontreal.ca> 2008-02-12 Stefan Monnier <monnier@iro.umontreal.ca>
* keyboard.c (read_avail_input):
* frame.c (Fdelete_frame): Call Fdelete_terminal. * frame.c (Fdelete_frame): Call Fdelete_terminal.
2008-02-11 Stefan Monnier <monnier@iro.umontreal.ca> 2008-02-11 Stefan Monnier <monnier@iro.umontreal.ca>
......
...@@ -7134,10 +7134,11 @@ read_avail_input (expected) ...@@ -7134,10 +7134,11 @@ read_avail_input (expected)
kill (getpid (), SIGHUP); kill (getpid (), SIGHUP);
/* XXX Is calling delete_terminal safe here? It calls Fdelete_frame. */ /* XXX Is calling delete_terminal safe here? It calls Fdelete_frame. */
if (t->delete_terminal_hook) {
(*t->delete_terminal_hook) (t); Lisp_Object tmp;
else XSETTERMINAL (tmp, t);
delete_terminal (t); Fdelete_terminal (tmp, Qnoelisp);
}
} }
if (hold_quit.kind != NO_EVENT) if (hold_quit.kind != NO_EVENT)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment