The Trunk: ToolBuilder-Morphic-mt.269.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: ToolBuilder-Morphic-mt.269.mcz

commits-2
Marcel Taeumel uploaded a new version of ToolBuilder-Morphic to project The Trunk:
http://source.squeak.org/trunk/ToolBuilder-Morphic-mt.269.mcz

==================== Summary ====================

Name: ToolBuilder-Morphic-mt.269
Author: mt
Time: 2 November 2020, 2:28:06.554816 pm
UUID: 305f872b-8971-d743-af47-f0aef148f1e7
Ancestors: ToolBuilder-Morphic-mt.268

Complements Morphic-mt.1709. Thanks to Christoph (ct)!

=============== Diff against ToolBuilder-Morphic-mt.268 ===============

Item was changed:
  ----- Method: PluggableListMorphPlus>>wantsDroppedMorph:event: (in category 'drag and drop') -----
  wantsDroppedMorph: aTransferMorph event: anEvent
 
  dropItemSelector ifNil: [^ false].
+ aTransferMorph isTransferMorph ifFalse: [^ false].
- (aTransferMorph isKindOf: TransferMorph) ifFalse: [^ false].
  wantsDropSelector ifNil: [^ true].
 
  ^ model perform: wantsDropSelector withEnoughArguments: {
  aTransferMorph passenger.
  aTransferMorph dragTransferType.
  aTransferMorph source.
  aTransferMorph}!

Item was changed:
  ----- Method: PluggableTreeMorph>>wantsDroppedMorph:event: (in category 'drag and drop') -----
  wantsDroppedMorph: aTransferMorph event: anEvent
 
  dropItemSelector ifNil: [^ false].
  wantsDropSelector ifNil: [^ true].
 
+ aTransferMorph isTransferMorph ifFalse: [^ false].
- (aTransferMorph isKindOf: TransferMorph) ifFalse: [^ false].
 
  ^ model perform: wantsDropSelector withEnoughArguments: {
  aTransferMorph passenger.
  aTransferMorph dragTransferType.
  aTransferMorph source.
  aTransferMorph}!