-/* $Header: /cvsroot/emacs/emacs/oldXMenu/Activate.c,v 1.6 2003/09/01 15:45:47 miles Exp $ */
/* Copyright Massachusetts Institute of Technology 1985 */
#include "copyright.h"
+/*
+Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007
+ Free Software Foundation, Inc.
+
+This program is free software; you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation; either version 3, or (at your option)
+any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program; see the file COPYING. If not, write to the
+Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+Boston, MA 02110-1301, USA. */
+
+
/*
* XMenu: MIT Project Athena, X Window system menu package
*
#include <config.h>
#include "XMenuInt.h"
+#include <X11/keysym.h>
/* For debug, set this to 0 to not grab the keyboard on menu popup */
int x_menu_grab_keyboard = 1;
+typedef void (*Wait_func)();
+
+static Wait_func wait_func;
+static void* wait_data;
+
+void
+XMenuActivateSetWaitFunction (func, data)
+ Wait_func func;
+ void *data;
+{
+ wait_func = func;
+ wait_data = data;
+}
+
int
XMenuActivate(display, menu, p_num, s_num, x_pos, y_pos, event_mask, data,
help_callback)
Window root, child;
int root_x, root_y, win_x, win_y;
unsigned int mask;
+ KeySym keysym;
/*
* Define and allocate a foreign event queue to hold events
* Begin event processing loop.
*/
while (1) {
+ if (wait_func) (*wait_func) (wait_data);
XNextEvent(display, &event); /* Get next event. */
switch (event.type) { /* Dispatch on the event type. */
case Expose:
}
selection = True;
break;
+ case KeyPress:
+ case KeyRelease:
+ keysym = XLookupKeysym (&event.xkey, 0);
+
+ /* Pop down on C-g and Escape. */
+ if ((keysym == XK_g && (event.xkey.state & ControlMask) != 0)
+ || keysym == XK_Escape) /* Any escape, ignore modifiers. */
+ {
+ ret_val = XM_NO_SELECT;
+ selection = True;
+ }
+ break;
default:
/*
* If AEQ mode is enabled then queue the event.
free((char *)feq_tmp);
}
+ wait_func = 0;
+
/*
* Return successfully.
*/