[etoys-dev] Etoys: Tools-kfr.13.mcz

[commits at source.squeak.org]

Karl Ramberg uploaded a new version of Tools to project Etoys:
http://source.squeak.org/etoys/Tools-kfr.13.mcz

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

Name: Tools-kfr.13
Author: kfr
Time: 11 December 2012, 7:46:58 pm
UUID: 0ea23466-cb95-f146-aad8-e9ba30466970
Ancestors: Tools-kfr.12

Insert players uniqueNameForReference when dropped on a ScriptEditor textual method pane. Simple support for objRef tiles added. Rejects most other dropped tiles at the moment.

http://tracker.squeakland.org/browse/SQ-161

=============== Diff against Tools-kfr.12 ===============

Item was added:
+ ----- Method: MethodHolder>>acceptDroppingMorph:event:inMorph: (in category 'drag and drop') -----
+ acceptDroppingMorph: dropee event: evt inMorph: targetMorph 
+ 	"Return the dropee to its old position, and add a reference to it at the cursor point."
+ 	| externalName |
+ 	(dropee isTileLike) 
+ 				ifTrue:[dropee isTileMorph 
+ 							ifFalse:[^dropee rejectDropMorphEvent: evt. ]
+ 							ifTrue:[externalName := dropee actualObject uniqueNameForReference]]
+ 				ifFalse:[externalName := dropee assuredPlayer uniqueNameForReference].
+ 	targetMorph correctSelectionWithString: externalName.
+ 	dropee rejectDropMorphEvent: evt.
+ 	^ true "success"
+ !

Item was added:
+ ----- Method: MethodHolder>>wantsDroppedMorph:event:inMorph: (in category 'drag and drop') -----
+ wantsDroppedMorph: dropee event: evt inMorph: target
+ 
+ 	^true
+ 		
+ !