From: Miles Bader <miles@gnu.org>
Date: Thu, 4 Jul 1996 05:46:05 +0000 (+0000)
Subject: (XTread_socket): Use lw_tookit_related_event_p to avoid sending
X-Git-Tag: emacs-19.34~262
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b40f815a56cdfe6a61b069815016c26cef78608f;p=emacs.git

(XTread_socket): Use lw_tookit_related_event_p to avoid sending
toolkit-specific events to Emacs.
---

diff --git a/src/xterm.c b/src/xterm.c
index 49dd9fe164b..27e99ca3726 100644
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -3651,6 +3651,13 @@ XTread_socket (sd, bufp, numchars, waitp, expected)
 					  80, &keysym, &compose_status);
 #endif
 
+#ifdef USE_X_TOOLKIT
+                  if (lw_toolkit_related_event_p (&event))
+                    {
+                      XtDispatchEvent (&event);
+                      break;
+                    }
+#endif
 		  orig_keysym = keysym;
 
 		  if (numchars > 1)