changeset 6059:0021cbdc591b

(x_window): Call XChangeWindowAttributes with the standard event set to make all these events reach the Emacs frame.
author Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
date Thu, 24 Feb 1994 12:54:54 +0000
parents 662b9cd767fe
children 3426f36178e5
files src/xfns.c
diffstat 1 files changed, 8 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/xfns.c	Thu Feb 24 08:07:16 1994 +0000
+++ b/src/xfns.c	Thu Feb 24 12:54:54 1994 +0000
@@ -1699,6 +1699,8 @@
      struct frame *f;
 {
   XClassHint class_hints;
+  XSetWindowAttributes attributes;
+  unsigned long attribute_mask;
 
 #ifdef USE_X_TOOLKIT
   Widget shell_widget;
@@ -1772,13 +1774,16 @@
 		   Xatom_wm_protocols, XA_ATOM, 32, PropModeAppend,
 		   (unsigned char*) NULL, 0);
 
+ /* Make all the standard events reach the Emacs frame.  */
+  attributes.event_mask = STANDARD_EVENT_SET;
+  attribute_mask = CWEventMask;
+  XChangeWindowAttributes (XtDisplay (shell_widget), XtWindow (shell_widget),
+			   attribute_mask, &attributes);
+
   XtMapWidget (screen_widget);
 
 #else /* not USE_X_TOOLKIT */
 
-  XSetWindowAttributes attributes;
-  unsigned long attribute_mask;
-
 
   attributes.background_pixel = f->display.x->background_pixel;
   attributes.border_pixel = f->display.x->border_pixel;