check whether selection is a view or a collection
authorca
Mon, 21 Jul 1997 15:27:23 +0200
changeset 231 75de472d579f
parent 230 60663807d4fd
child 232 4ba88c3270fc
check whether selection is a view or a collection when copying
UIPainterView.st
--- a/UIPainterView.st	Mon Jul 21 12:24:17 1997 +0200
+++ b/UIPainterView.st	Mon Jul 21 15:27:23 1997 +0200
@@ -337,7 +337,9 @@
 drop:anObjectOrCollection at:aPoint
     |spec newSel oldSel|
 
-    oldSel := selection copy.
+    (oldSel := selection) isCollection ifTrue:[
+        oldSel := selection copy
+    ].
     spec := (anObjectOrCollection at:1) theObject.
     newSel := self pasteSpecifications:spec keepLayout:false.