Mercurial > emacs
changeset 5133:16fe8285dc2a
(kbd_buffer_get_event): Handle delete_window_event's.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 23 Nov 1993 10:44:10 +0000 |
| parents | de089ed6966f |
| children | 0a4e46e15304 |
| files | src/keyboard.c |
| diffstat | 1 files changed, 13 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/keyboard.c Tue Nov 23 10:41:27 1993 +0000 +++ b/src/keyboard.c Tue Nov 23 10:44:10 1993 +0000 @@ -1939,6 +1939,19 @@ abort (); #endif } +#ifdef HAVE_X11 + else if (event->kind == delete_window_event) + { + Lisp_Object value; + + Fdelete_frame (event->frame_or_window, Qt); + kbd_fetch_ptr = event + 1; + + value = Fvisible_frame_list (); + if (! CONSP (value)) + kill (getpid (), SIGHUP); + } +#endif /* Just discard these, by returning nil. (They shouldn't be found in the buffer, but on some machines it appears they do show up.) */