fix remaining NumLock problems by teaching tk to detect the Alt modifier

[micropolis] / src / tk / tkint.h

diff --git a/src/tk/tkint.h b/src/tk/tkint.h
index e2c7b7ee559f3a38cabd56168d87ef13c9e16e3f..a5cc780015ccdaf908e48142e3566eb1a667441b 100644 (file)
--- a/src/tk/tkint.h
+++ b/src/tk/tkint.h
@@ -38,6 +38,9 @@
 #include "tclhash.h"
 #endif
 
 #include "tclhash.h"
 #endif
 

+#define META_MASK      (AnyModifier<<1)
+#define ALT_MASK       (AnyModifier<<2)
+

 /*
  * One of the following structures is maintained for each display
  * containing a window managed by Tk:
 /*
  * One of the following structures is maintained for each display
  * containing a window managed by Tk:


@@ -76,6 +79,9 @@ typedef struct TkDisplay {
                                 * retrieved from the server yet. */
     KeySym *keySyms;           /* Array of KeySyms, returned by
                                 * XGetKeyboardMapping. */
                                 * retrieved from the server yet. */
     KeySym *keySyms;           /* Array of KeySyms, returned by
                                 * XGetKeyboardMapping. */

+    unsigned int modeModMask;
+    unsigned int metaModMask;
+    unsigned int altModMask;

 
     /*
      * Information used by tkError.c only:
 
     /*
      * Information used by tkError.c only: