XWorkstation.st
changeset 3738 c08c71982894
parent 3693 b01b0cd76a61
child 3758 c484f793f9b1
--- a/XWorkstation.st	Wed Sep 25 17:29:17 2002 +0200
+++ b/XWorkstation.st	Wed Sep 25 18:13:57 2002 +0200
@@ -4813,14 +4813,17 @@
 		keySymString = XKeysymToString(keySym);
 		if (keySymString) {
 		    arg = __MKSTRING(keySymString);
+		} else {
+		    arg = nil;
 		}
 	    }
 
+#ifdef IGNORE_UNKNOWN_KEYCODES
 	    if (arg == nil) {
 		/* happens sometimes (alt-graph on sun has no keysym) */
 		RETURN (false);
 	    }
-
+#endif
 	    __ArrayInstPtr(eventArr)->a_element[2] = sym;
 
 	    __ArrayInstPtr(eventArr)->a_element[3] = arg; __STORE(eventArr, arg);
@@ -11758,6 +11761,6 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.412 2002-08-12 14:21:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.413 2002-09-25 16:13:57 cg Exp $'
 ! !
 XWorkstation initialize!