--- a/UIPainterView.st	Tue Jul 17 09:27:23 2018 +0200
+++ b/UIPainterView.st	Wed Jul 18 13:36:53 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1995 by Claus Gittinger / eXept Software AG
 	      All Rights Reserved
@@ -489,6 +487,11 @@
         beforeIndex notNil ifTrue:[
             beforeIndex := beforeIndex + 1
         ].
+
+        containerToPasteInto isLayoutWrapper ifTrue:[
+            eachSpec layout:(#extent->view extent)
+        ].
+        
         (keepLayout or:[eachSpec keepUILayout]) ifTrue:[
             eachSpec layout isAssociation ifTrue:[
                 eachSpec layout key == #extent ifTrue:[
@@ -566,6 +569,7 @@
     ^ newSel
 
     "Modified: / 16-11-2017 / 23:49:56 / cg"
+    "Modified: / 18-07-2018 / 09:15:44 / Claus Gittinger"
 !
 
 pasteSpecifications:aSpecificationOrList into:aContainerOrNil keepLayout:keepLayout keepPosition:keepPosition at:aPointOrNilOrKeep