emacs: oldXMenu/Activate.c comparison

comparison oldXMenu/Activate.c @ 49600:23a1cea22d13

Trailing whitespace deleted.

author	Juanma Barranquero <lekktu@gmail.com>
date	Tue, 04 Feb 2003 14:56:31 +0000
parents	17275bfd5698
children	695cf19ef79e d7ddb3e565de

comparison

equal deleted inserted replaced

-:5ade352e8d1c
+:23a1cea22d13
-/* $Header: /cvsroot/emacs//emacs/oldXMenu/Activate.c,v 1.3 2000/07/21 14:36:24 gerd Exp $ */
+/* $Header: /cvs/emacs/oldXMenu/Activate.c,v 1.4 2002/04/22 18:27:03 jhd Exp $ */
 /* Copyright    Massachusetts Institute of Technology    1985	*/
 #include "copyright.h"
 /*
 *			the last known current pane and selection indices).
 *			The following are the defined return states:
 *
 *			1)	If at any time an error occurs the data
 *				pointer is left untouched and XM_FAILURE
 *				is returned.
 *
 *			2)	When a selection request is received (i.e.,
 *				when the specified mouse event occurs) the
 *				data pointer will be set to the data
 *				associated with the particular selection
 *			3)	If no selection was current at the time a
 *				selection request is made the data pointer
 *				will be left untouched and XM_NO_SELECT will
 *				be returned.
 *
 *			4)	If the selection that was current at the time
 *				a selection request is made is not an active
 *				selection the data pointer will be left
 *				untouched and XM_IA_SELECT will be returned.
 *
 *			Since X processes events in an asynchronous manner
 	struct _xmeventque *next;
 } XMEventQue;
 XMEventQue *feq = NULL;    		/* Foreign event queue. */
 XMEventQue *feq_tmp;		/* Foreign event queue temporary. */
 /*
 * If there are no panes in the menu then return failure
 * because the menu is not initialized.
 */
 if (menu->p_count == 0) {
 /*
 * Compute origin of menu so that cursor is in
 * Correct pane and selection.
 */
 _XMTransToOrigin(display,
 		     menu,
 		     cur_p, cur_s,
 		     x_pos, y_pos,
 		     &orig_x, &orig_y);
 menu->x_pos = orig_x;	/* Store X and Y coords of menu. */
 menu->y_pos = orig_y;
 if (XMenuRecompute(display, menu) == XM_FAILURE) {
 	return(XM_FAILURE);
 }
 /*
 * XMenu are sent back to the application via an application
 * provided event handler or discarded if the application has
 * not provided an event handler.
 */
 XSync(display, 0);
 /*
 * Grab the mouse for menu input.
 */
 status = XGrabPointer(
 			  display,
 			  menu->parent,
 			  True,
 			  event_mask,
 GrabModeAsync,
 CurrentTime);
 if (status != Success)
 XUngrabPointer(display, CurrentTime);
 }
 if (status == _X_FAILURE) {
 	_XMErrorCode = XME_GRAB_MOUSE;
 	return(XM_FAILURE);
 }
 /*
 * Map the menu panes.
 */
 XMapWindow(display, cur_p->window);
 for (p_ptr = menu->p_list->next;
 	 p_ptr != cur_p;
 	 p_ptr = p_ptr->next)
 XMapWindow(display, p_ptr->window);
 for (p_ptr = cur_p->next;
 	 p_ptr != menu->p_list;
 	 p_ptr = p_ptr->next)
 XMapWindow(display, p_ptr->window);
 XRaiseWindow(display, cur_p->window);	/* Make sure current */
 						/* pane is on top. */
 cur_s = NULL;			/* Clear current selection. */
 /*
 * Begin event processing loop.
 */
 while (1) {
 	XNextEvent(display, &event);	/* Get next event. */
 	switch (event.type) {		/* Dispatch on the event type. */
 case Expose:
 	    event_xmp = (XMPane *)XLookUpAssoc(display,
 					       menu->assoc_tab,
 					       event.xexpose.window);
 	    if (event_xmp == NULL) {
 		/*
 		 * If AEQ mode is enabled then queue the event.
 		 */
 		else if (_XMEventHandler) (*_XMEventHandler)(&event);
 		break;
 	    }
 	    if (event_xmp->activated) {
 		XSetWindowBackground(display,
 				     event_xmp->window,
 				     menu->bkgnd_color);
 	    }
 	    else {
 		XSetWindowBackgroundPixmap(display,
 					   event_xmp->window,
 					   menu->inact_pixmap);
 	    }
 	    _XMRefreshPane(display, menu, event_xmp);
 	    break;
 case EnterNotify:
 	    /*
 	     * First wait a small period of time, and see
 	     * if another EnterNotify event follows hard on the
 	     * heels of this one. i.e., the user is simply
 	     * "passing through". If so, ignore this one.
 	     */
 	    event_xmw = (XMWindow *)XLookUpAssoc(display,
 						 menu->assoc_tab,
 						 event.xcrossing.window);
 	    if (event_xmw == NULL) break;
 	    if (event_xmw->type == SELECTION) {
 		if (XPending(display) != 0) {
 		    XPeekEvent(display, &peek_event);
 		    if(peek_event.type == LeaveNotify) {
 			break;
 		    }
 		}
 		cur_s = (XMSelect *)event_xmw;
 		help_callback (cur_s->help_string,
 			       cur_p->serial, cur_s->serial);
 		/*
 		 * If the pane we are in is active and the
 		 * selection entered is active then activate
 		 * the selection.
 		 */
 		 * in that case, this is probably an ugly fix!
 		 * i hope someone more familiar with this code would
 		 * take it from here.  -- caveh@eng.sun.com.
 		 */
 		XSetWindowBackground(display,
 				     event_xmp->window,
 				     menu->bkgnd_color);
 		_XMRefreshPane(display, menu, event_xmp);
 #endif
 		cur_p = event_xmp;
 	    }
 						 menu->assoc_tab,
 						 event.xcrossing.window
 						 );
 	    if (event_xmw == NULL) break;
 	    if(cur_s == NULL) break;
 	    /*
 	     * If the current selection was activated then
 	     * deactivate it.
 	     */
 	    if (cur_s->activated) {
 		cur_s->activated = False;
 		_XMRefreshSelection(display, menu, cur_s);
 	    }
 	    cur_s = NULL;
 	    break;
 case ButtonPress:
 case ButtonRelease:
 		*p_num = cur_p->serial;
 		/*
 		 * Check to see if there is a current selection.
 /*
 * Unmap the menu.
 */
 for ( p_ptr = menu->p_list->next;
 	 p_ptr != menu->p_list;
 	 p_ptr = p_ptr->next)
 {
 	  XUnmapWindow(display, p_ptr->window);
 }
 /*
 * Ungrab the mouse.
 */
 XUngrabPointer(display, CurrentTime);
 XUngrabKeyboard(display, CurrentTime);
 /*
 * Restore bits under where the menu was if we managed
 * to save them and free the pixmap.
 */
 /*
 /*
 * Synchronize the X buffers and the X event queue.
 */
 XSync(display, 0);
 /*
 * Dispatch any events remaining on the queue.
 */
 while (QLength(display)) {
 	/*
 	feq_tmp = feq;
 	XPutBackEvent(display, &feq_tmp->event);
 	feq = feq_tmp->next;
 	free((char *)feq_tmp);
 }
 /*
 * Return successfully.
 */
 _XMErrorCode = XME_NO_ERROR;
 return(ret_val);

Mercurial > emacs

comparison oldXMenu/Activate.c @ 49600:23a1cea22d13