[Emacs-diffs] Changes to emacs/src/xfns.c

[Jan Djärv]

Index: emacs/src/xfns.c
diff -c emacs/src/xfns.c:1.624 emacs/src/xfns.c:1.625
*** emacs/src/xfns.c:1.624      Tue Nov 23 19:56:55 2004
--- emacs/src/xfns.c    Mon Dec 27 15:24:11 2004
***************
*** 5243,5248 ****
--- 5243,5258 ----
        XEvent event;
        x_menu_wait_for_event (0);
        XtAppNextEvent (Xt_app_con, &event);
+       if (event.type == KeyPress
+           && FRAME_X_DISPLAY (f) == event.xkey.display)
+         {
+           KeySym keysym = XLookupKeysym (&event.xkey, 0);
+ 
+           /* Pop down on C-g.  */
+           if (keysym == XK_g && (event.xkey.state & ControlMask) != 0)
+             XtUnmanageChild (dialog);
+         }
+   
        (void) x_dispatch_event (&event, FRAME_X_DISPLAY (f));
      }