From: Gerd Moellmann <gerd@gnu.org>
Date: Thu, 22 Jun 2000 22:05:55 +0000 (+0000)
Subject: (Fx_file_dialog) [HAVE_MOTIF_2_1]: Handle events
X-Git-Tag: emacs-pretest-21.0.90~3132
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0310009802741e7ef15822d496ddf44472ecd601;p=emacs.git

(Fx_file_dialog) [HAVE_MOTIF_2_1]: Handle events
differently.
---

diff --git a/src/xfns.c b/src/xfns.c
index 8edbd66b160..3136c764bc4 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -10053,6 +10053,15 @@ selection dialog's entry field, if MUSTMATCH is non-nil.")
       XmListSetPos (list, item_pos);
     }
 
+#ifdef HAVE_MOTIF_2_1
+
+  /* Process events until the user presses Cancel or OK.  */
+  result = 0;
+  while (result == 0 || XtAppPending (Xt_app_con))
+    XtAppProcessEvent (Xt_app_con, XtIMAll);
+
+#else /* not HAVE_MOTIF_2_1 */
+  
   /* Process all events until the user presses Cancel or OK.  */
   for (result = 0; result == 0;)
     {
@@ -10068,13 +10077,15 @@ selection dialog's entry field, if MUSTMATCH is non-nil.")
       parent = widget;
       while (parent && parent != dialog)
 	parent = XtParent (parent);
-      
+
       if (parent == dialog
 	  || (event.type == Expose
 	      && !process_expose_from_menu (event)))
 	XtDispatchEvent (&event);
     }
 
+#endif /* not HAVE_MOTIF_2_1 */
+
   /* Get the result.  */
   if (result == XmCR_OK)
     {