From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 23 Jul 1993 08:04:52 +0000 (+0000)
Subject: (XTread_socket) [! HAVE_X11R5]:
X-Git-Tag: emacs-19.34~11607
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7719aa0601889b633c6581059945c4d74fd81537;p=emacs.git

(XTread_socket) [! HAVE_X11R5]:
Check for XK_Mode_switch and XK_Num_Lock, if defined.
---

diff --git a/src/xterm.c b/src/xterm.c
index cbf30e3641c..dbfd6d1ab99 100644
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -2940,7 +2940,16 @@ XTread_socket (sd, bufp, numchars, waitp, expected)
 		       || IsKeypadKey (keysym) /* 0xff80 <= x < 0xffbe */
 		       || IsFunctionKey (keysym) /* 0xffbe <= x < 0xffe1 */
 		       || x_is_vendor_fkey (orig_keysym))
-		      && ! IsModifierKey (orig_keysym)) /* wherever */
+		      && ! (IsModifierKey (orig_keysym)
+#ifndef HAVE_X11R5
+#ifdef XK_Mode_switch
+			    || ((unsigned)(orig_keysym) == XK_Mode_switch)
+#endif
+#ifdef XK_Num_Lock
+			    || ((unsigned)(orig_keysym) == XK_Num_Lock)
+#endif
+#endif /* not HAVE_X11R5 */
+			    ))
 		    {
 		      if (temp_index == sizeof temp_buffer / sizeof (short))
 			temp_index = 0;