summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Event.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/Event.c b/src/Event.c
index de52910..e3d977e 100644
--- a/src/Event.c
+++ b/src/Event.c
@@ -1549,9 +1549,12 @@ void XtMainLoop(void)
void XtAppMainLoop(
XtAppContext app)
{
+ long m = XtIMAll;
LOCK_APP(app);
do {
- XtAppProcessEvent(app, XtIMAll);
+ if( m == 0 ) m=XtIMAll;
+ XtAppProcessEvent(app, m);
+ m >>= 1;
} while(app->exit_flag == FALSE);
UNLOCK_APP(app);
}