oops - dropping specs
authorClaus Gittinger <cg@exept.de>
Thu, 09 Oct 2003 20:53:46 +0200
changeset 1752 78d47dc11501
parent 1751 fd6ac12ed9e4
child 1753 f3db5271acd6
oops - dropping specs
UIPainterView.st
--- a/UIPainterView.st	Tue Oct 07 23:35:08 2003 +0200
+++ b/UIPainterView.st	Thu Oct 09 20:53:46 2003 +0200
@@ -388,6 +388,9 @@
             self selection:containerToPasteInto.
         ].
     ].
+    containerToPasteInto isNil ifTrue:[
+        containerToPasteInto := self
+    ].
 
     (self canPaste:aSpecificationOrList) ifFalse:[
         Dialog warn:'Cannot paste into selected component (not a container ?)'.