mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-01 11:14:55 +00:00
Code Issues Releases Activity

entered into RCS

Browse Source
This commit is contained in:
Paul Reilly 1994-09-25 17:18:58 +00:00
parent 00364e4e3d
commit 45d91af424
1 changed files with 20 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
lwlib/xlwmenu.c
View File

@ -1289,7 +1289,7 @@ handle_single_motion_event (mw, ev)
set_new_state (mw, val, level);
remap_menubar (mw);
#if 0
#if 1
/* Sync with the display. Makes it feel better on X terms. */
XSync (XtDisplay (mw), False);
#endif
@ -1307,6 +1307,7 @@ handle_motion_event (mw, ev)
handle_single_motion_event (mw, ev);
/* allow motion events to be generated again */
#if 0
if (ev->is_hint
&& XQueryPointer (XtDisplay (mw), ev->window,
&ev->root, &ev->subwindow,
@ -1316,6 +1317,14 @@ handle_motion_event (mw, ev)
&& ev->state == state
&& (ev->x_root != x || ev->y_root != y))
handle_single_motion_event (mw, ev);
#else
XQueryPointer (XtDisplay (mw), ev->window,
&ev->root, &ev->subwindow,
&ev->x_root, &ev->y_root,
&ev->x, &ev->y,
&ev->state);
handle_single_motion_event (mw, ev);
#endif
}
static void
@ -1482,3 +1491,13 @@ pop_up_menu (mw, event)
handle_motion_event (mw, (XMotionEvent*)event);
}
void GetWindowAttributes (w)
Widget w;
{
XWindowAttributes attrs;
XGetWindowAttributes (XtDisplay (w),
XtWindow (w),
&attrs);
}