--- a/UIObjectView.st	Mon Mar 03 11:06:01 1997 +0100
+++ b/UIObjectView.st	Mon Mar 03 11:07:14 1997 +0100
@@ -555,7 +555,11 @@
     releaseAction := [ self endCreate].
 
     object := createClass new.
-    widget addSubView:object.
+    (widget isKindOf:ScrollableView) ifTrue:[
+        widget scrolledView:object
+    ] ifFalse:[
+        widget addSubView:object.
+    ].
 
     start := self alignToGrid:aPoint.
     delta := widget originRelativeTo:self.
@@ -568,7 +572,7 @@
     self actionCreate:object frame:frame delta:delta.
     self invertOutlineOf:object.
 
-
+    "Modified: 1.3.1997 / 01:46:17 / cg"
 ! !
 
 !UIObjectView methodsFor:'object moving'!