# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 771435814 0
# Node ID 26a1d7b2670b470206b04d4f927c078133a1debe
# Parent  1d1693211560eb84cc8a305301a5e178706f781b
(x_window): Request "save yourself" commands.

diff -r 1d1693211560 -r 26a1d7b2670b src/xfns.c
--- a/src/xfns.c	Sun Jun 12 14:37:21 1994 +0000
+++ b/src/xfns.c	Sun Jun 12 15:43:34 1994 +0000
@@ -2051,9 +2051,14 @@
   f->display.x->wm_hints.input = True;
   f->display.x->wm_hints.flags |= InputHint;
   XSetWMHints (x_current_display, FRAME_X_WINDOW (f), &f->display.x->wm_hints);
-  XSetWMProtocols (x_current_display, FRAME_X_WINDOW (f),
-		   &Xatom_wm_delete_window, 1);
-
+
+  /* Request "save yourself" and "delete window" commands from wm.  */
+  {
+    Atom protocols[2];
+    protocols[0] = Xatom_wm_delete_window;
+    protocols[1] = Xatom_wm_save_yourself;
+    XSetWMProtocols (x_current_display, FRAME_X_WINDOW (f), protocols, 2);
+  }
 
   /* x_set_name normally ignores requests to set the name if the
      requested name is the same as the current name.  This is the one