Mercurial > emacs
changeset 7870:537930034e73
(XTread_socket): Handle Xatom_wm_save_yourself by calling XSetCommand.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 13 Jun 1994 20:41:21 +0000 |
parents | 3b27d2451f83 |
children | 11fae1619e42 |
files | src/xterm.c |
diffstat | 1 files changed, 15 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/xterm.c Mon Jun 13 20:41:00 1994 +0000 +++ b/src/xterm.c Mon Jun 13 20:41:21 1994 +0000 @@ -178,6 +178,10 @@ extern Lisp_Object Vcommand_line_args; char *hostname, *x_id_name; +/* Initial values of argv and argc. */ +extern char **initial_argv; +extern int initial_argc; + /* This is the X connection that we are using. */ Display *x_current_display; @@ -3440,6 +3444,17 @@ a keyboard or mouse event arrives. */ if (numchars > 0) { + /* This is just so we only give real data once + for a single Emacs process. */ + if (event.xclient.window + == FRAME_X_WINDOW (selected_frame)) + XSetCommand (x_current_display, + event.xclient.window, + initial_argv, initial_argc); + else + XSetCommand (x_current_display, + event.xclient.window, + 0, 0); } } else if (event.xclient.data.l[0] == Xatom_wm_delete_window)