--- a/ScrollableView.st Fri Aug 20 10:56:52 2004 +0200
+++ b/ScrollableView.st Mon Aug 30 19:55:43 2004 +0200
@@ -2185,9 +2185,8 @@
on to the scrolledView - so we do not have to care for all
possible messages ...(thanks to the Message class)"
- scrolledView isNil ifFalse:[
- ^ scrolledView perform:(aMessage selector)
- withArguments:(aMessage arguments)
+ scrolledView notNil ifTrue:[
+ ^ aMessage sendTo:scrolledView.
].
^ super doesNotUnderstand:aMessage
@@ -2288,5 +2287,5 @@
!ScrollableView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.129 2004-06-01 11:17:39 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.130 2004-08-30 17:55:27 stefan Exp $'
! !