4756 canDrop:anObjectOrCollection

  4756 canDrop:aCollectionOfDropObjects

  4757     "can drop ? delegate to canvas"

  4757     "can drop ? -> delegate to canvas"

  4758 

  4758 

  4759     ^ self canvas canDrop:anObjectOrCollection

  4759     ^ self canvas canDrop:aCollectionOfDropObjects

  4760 !

  4760 !

  4761 

  4761 

  4762 drop:anObjectOrCollection at:aPoint

  4762 drop:aCollectionOfDropObjects at:aPoint

  4763     "drop objects ? delegate to canvas"

  4763     "drop objects -> delegate to canvas"

  4764 

  4764 

  4765     self canvas drop:anObjectOrCollection at:aPoint

  4765     self canvas drop:aCollectionOfDropObjects at:aPoint