[squeak-dev] The Trunk: ToolBuilder-Morphic-cmm.85.mcz

commits at source.squeak.org commits at source.squeak.org
Mon May 28 02:59:24 UTC 2012


Chris Muller uploaded a new version of ToolBuilder-Morphic to project The Trunk:
http://source.squeak.org/trunk/ToolBuilder-Morphic-cmm.85.mcz

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

Name: ToolBuilder-Morphic-cmm.85
Author: cmm
Time: 27 May 2012, 9:59:06.378 pm
UUID: 86972436-d2b6-4b86-b2c8-11f321fb7fad
Ancestors: ToolBuilder-Morphic-cwp.84

- TreeMorph:  allow drop-target callbacks to interrogate the shouldCopy argument.
- After the drop operation is complete, remove the drop highlight.

=============== Diff against ToolBuilder-Morphic-cwp.84 ===============

Item was changed:
  ----- Method: PluggableTreeMorph>>acceptDroppingMorph:event: (in category 'morphic') -----
+ acceptDroppingMorph: aTransferMorph event: evt 
+ 	dropItemSelector ifNil: [ ^ self ].
+ 	model
+ 		perform: dropItemSelector
+ 		withEnoughArguments: {aTransferMorph passenger. 
+ 			(self itemFromPoint: evt position) withoutListWrapper. 
+ 			aTransferMorph shouldCopy}.
- acceptDroppingMorph: aMorph event: evt
- 	| item dropTarget |
- 	dropItemSelector ifNil:[^self].
- 	item := aMorph passenger.
- 	dropTarget := (self itemFromPoint: evt position) withoutListWrapper.
- 	model perform: dropItemSelector with: item with: dropTarget.
  	evt hand releaseMouseFocus: self.
+ 	potentialDropMorph ifNotNil: [ potentialDropMorph highlightForDrop: false ].
+ 	Cursor normal show!
- 	Cursor normal show.
- !



More information about the Squeak-dev mailing list