--- a/ViewScroller.st	Fri Feb 29 14:19:07 2008 +0100
+++ b/ViewScroller.st	Fri Feb 29 14:21:10 2008 +0100
@@ -412,7 +412,7 @@
 
     changedObject == keepViewsChannel ifTrue:[
         self keepViews ifFalse:[ |views|
-            "destroy all client views other than the actuel scrolled view
+            "destroy all client views other than the actual scrolled view
             "
             views := frame subViews.
             views size ~~ 0 ifTrue:[
@@ -443,7 +443,7 @@
 !
 
 sizeChanged:how
-    "reposition the scrolledView, if required"
+    "my size changed. Reposition the scrolledView, if required"
 
     |newOrigin|
 
@@ -604,5 +604,5 @@
 !ViewScroller class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ViewScroller.st,v 1.28 2008-02-12 09:24:21 mb Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ViewScroller.st,v 1.29 2008-02-29 13:21:10 stefan Exp $'
 ! !