--- a/Wrapper.st	Thu May 09 00:02:28 1996 +0200
+++ b/Wrapper.st	Thu May 09 00:14:40 1996 +0200
@@ -77,30 +77,41 @@
 !Wrapper methodsFor:'accessing - bounds'!
 
 bounds
+    "return my bounds as the components bounds"
+
     ^ component bounds
 
     "Created: 8.5.1996 / 23:18:03 / cg"
+    "Modified: 9.5.1996 / 00:10:25 / cg"
 !
 
 bounds:newBounds
+    "set my bounds - forwarded to the wrapped object"
+
     component bounds:newBounds
 
     "Created: 8.5.1996 / 23:18:12 / cg"
-    "Modified: 8.5.1996 / 23:19:30 / cg"
+    "Modified: 9.5.1996 / 00:10:49 / cg"
 !
 
 preferredBounds
+    "return my preferredBounds as the components preferredBounds"
+
     ^ component preferredBounds
 
     "Created: 8.5.1996 / 23:18:53 / cg"
+    "Modified: 9.5.1996 / 00:10:32 / cg"
 ! !
 
 !Wrapper methodsFor:'displaying'!
 
 displayOn:aGC
+    "display myself - forwarded to the wrapped object"
+
     component displayOn:aGC
 
     "Created: 8.5.1996 / 23:19:24 / cg"
+    "Modified: 9.5.1996 / 00:10:59 / cg"
 ! !
 
 !Wrapper methodsFor:'testing'!
@@ -126,5 +137,5 @@
 !Wrapper class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Wrapper.st,v 1.1 1996-05-08 22:01:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Wrapper.st,v 1.2 1996-05-08 22:14:37 cg Exp $'
 ! !