--- a/ScrollableView.st	Sat May 06 16:18:13 1995 +0200
+++ b/ScrollableView.st	Sun May 07 02:16:56 1995 +0200
@@ -22,7 +22,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.15 1995-05-03 00:37:26 claus Exp $
+$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.16 1995-05-07 00:16:36 claus Exp $
 '!
 
 !ScrollableView class methodsFor:'documentation'!
@@ -43,7 +43,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.15 1995-05-03 00:37:26 claus Exp $
+$Header: /cvs/stx/stx/libwidg/ScrollableView.st,v 1.16 1995-05-07 00:16:36 claus Exp $
 "
 !
 
@@ -511,7 +511,7 @@
 	 pass my keyboard input (and other subviews input) 
 	 to the scrolled view ...
 	"
-	self delegate:(KeyboardForwarder to:scrolledView).
+	self delegate:(KeyboardForwarder toView:scrolledView).
     ]
 !
 
@@ -663,7 +663,7 @@
      pass my keyboard input (and other subviews input) 
      to the scrolled view ...
     "
-    self delegate:(KeyboardForwarder to:scrolledView).
+    self delegate:(KeyboardForwarder toView:scrolledView).
 
     realized ifTrue:[
 	self sizeChanged:nil.