diff -r 76b190967964 -r 6bd7e8101386 DropContext.st --- a/DropContext.st Fri Oct 13 18:24:00 2006 +0200 +++ b/DropContext.st Fri Oct 13 18:24:04 2006 +0200 @@ -9,8 +9,6 @@ other person. No title to or ownership of the software is hereby transferred. " - - "{ Package: 'stx:libview2' }" Object subclass:#DropContext @@ -261,11 +259,11 @@ !DropContext methodsFor:'queries'! canDrop - "returns true if current dropTarget can drop draggable objects" + "returns true if the current dropTarget can drop the objects" - ^ dropTarget isNil - ifTrue:[false] - ifFalse:[dropTarget canDrop:self] + ^ dropTarget notNil and:[dropTarget canDrop:self] + + "Modified: / 13-10-2006 / 15:48:02 / cg" ! clearHasDroppedFlagToSuppressFeedBack @@ -297,5 +295,5 @@ !DropContext class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libview2/DropContext.st,v 1.11 2006-01-24 16:52:49 cg Exp $' + ^ '$Header: /cvs/stx/stx/libview2/DropContext.st,v 1.12 2006-10-13 16:24:04 cg Exp $' ! !