--- a/UIPainterView.st Thu Oct 05 17:57:20 2006 +0200
+++ b/UIPainterView.st Fri Oct 13 11:48:36 2006 +0200
@@ -9,7 +9,6 @@
other person. No title to or ownership of the software is
hereby transferred.
"
-
"{ Package: 'stx:libtool2' }"
UIObjectView subclass:#UIPainterView
@@ -503,10 +502,12 @@
canDrop:aCollectionOfDropObjects
"returns true if something can be dropped"
- (aCollectionOfDropObjects size == 1 and:[self enabled and:[self numberOfSelections <= 1]]) ifTrue:[
- ^ aCollectionOfDropObjects first theObject isKindOf:UISpecification
- ].
- ^ false
+ ^ (aCollectionOfDropObjects size == 1
+ and:[ self enabled
+ and:[ self numberOfSelections <= 1
+ and:[ aCollectionOfDropObjects first theObject isKindOf:UISpecification ]]])
+
+ "Modified: / 13-10-2006 / 11:38:01 / cg"
!
canPaste