InspectorView.st
changeset 426 acfef3d2041a
parent 416 fd30ab6185c7
child 446 8ded3f1df7d2
--- a/InspectorView.st	Mon Mar 04 21:33:21 1996 +0100
+++ b/InspectorView.st	Mon Mar 04 23:30:30 1996 +0100
@@ -659,13 +659,13 @@
 keyPress:aKey x:x y:y
     "all my input is passed on to the workspace-field"
 
-    x >= 0 ifTrue:[
+    x notNil ifTrue:[
         "/ not already delegated
 
         workspace keyPress:aKey x:-1 y:-1
     ].
 
-    "Modified: 7.2.1996 / 13:44:56 / cg"
+    "Modified: 4.3.1996 / 22:21:37 / cg"
 !
 
 monitor:anInstVarName
@@ -743,5 +743,5 @@
 !InspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.40 1996-03-01 18:43:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.41 1996-03-04 22:30:30 cg Exp $'
 ! !