--- 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 $'
! !