mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-05 03:20:39 -08:00
Code Issues Projects Releases Wiki Activity

* term.c (close_gpm): New fun extracted from Fgpm_mouse_stop.

Browse source 
(Fgpm_mouse_stop): Use it.
* termhooks.h (close_gpm): Declare.
* keyboard.c (tty_read_avail_input): Forcefully close the gpm
connection if Gpm_GetEvent fails.
This commit is contained in:
Stefan Monnier 2008-09-12 04:10:59 +00:00
parent da39107c7b
commit ed5ff21d09
4 changed files with 23 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/ChangeLog
View file

@ -1,5 +1,11 @@
2008-09-12 Stefan Monnier <monnier@iro.umontreal.ca>
* term.c (close_gpm): New fun extracted from Fgpm_mouse_stop.
(Fgpm_mouse_stop): Use it.
* termhooks.h (close_gpm): Declare.
* keyboard.c (tty_read_avail_input): Forcefully close the gpm
connection if Gpm_GetEvent fails.
* window.c (set_window_buffer): Always preserve current-buffer.
2008-09-12 Glenn Morris <rgm@gnu.org>

3
src/keyboard.c
View file

@ -7110,6 +7110,9 @@ tty_read_avail_input (struct terminal *terminal,
while (gpm = Gpm_GetEvent (&event), gpm == 1) {
nread += handle_one_term_event (tty, &event, &hold_quit);
}
if (gpm < 0)
/* Presumably the GPM daemon has closed the connection. */
close_gpm ();
if (hold_quit.kind != NO_EVENT)
kbd_buffer_store_event (&hold_quit);
if (nread)

14
src/term.c
View file

@ -3128,6 +3128,15 @@ Gpm-mouse can only be activated for one tty at a time. */)
}
}
void
close_gpm ()
{
if (gpm_fd >= 0)
delete_gpm_wait_descriptor (gpm_fd);
while (Gpm_Close()); /* close all the stack */
gpm_tty = NULL;
}
DEFUN ("gpm-mouse-stop", Fgpm_mouse_stop, Sgpm_mouse_stop,
0, 0, 0,
doc: /* Close a connection to Gpm. */)
@ -3141,10 +3150,7 @@ DEFUN ("gpm-mouse-stop", Fgpm_mouse_stop, Sgpm_mouse_stop,
if (!tty || gpm_tty != tty)
return Qnil; /* Not activated on this terminal, nothing to do. */
if (gpm_fd >= 0)
delete_gpm_wait_descriptor (gpm_fd);
while (Gpm_Close()); /* close all the stack */
gpm_tty = NULL;
close_gpm ();
return Qnil;
}
#endif /* HAVE_GPM */

4
src/termhooks.h
View file

@ -643,5 +643,9 @@ extern void delete_terminal P_ ((struct terminal *));
/* The initial terminal device, created by initial_term_init. */
extern struct terminal *initial_terminal;
#ifdef HAVE_GPM
extern void close_gpm (void);
#endif
/* arch-tag: 33a00ecc-52b5-4186-a410-8801ac9f087d
(do not change this comment) */