--- a/UIPainterView.st Wed Oct 29 17:43:19 1997 +0100
+++ b/UIPainterView.st Wed Oct 29 17:44:55 1997 +0100
@@ -385,6 +385,20 @@
ifFalse:[self select:oldSel]
! !
+!UIPainterView methodsFor:'event handling'!
+
+keyPress:key x:x y:y view:aView
+ self keyPress:key x:x y:y
+
+
+!
+
+keyRelease:key x:x y:y view:aView
+ self keyRelease:key x:x y:y
+
+
+! !
+
!UIPainterView methodsFor:'generating output'!
aspectMethods
@@ -794,7 +808,14 @@
!
treeView:aTreeView
- treeView := aTreeView
+ treeView := aTreeView.
+
+ treeView delegate:(
+ KeyboardForwarder toView:self
+ condition:nil
+ filter:[:k|(k isSymbol and:[k ~~ #Return and:[(k startsWith:#Cursor) not]])]
+ )
+
! !
!UIPainterView methodsFor:'menus'!