[squeak-dev] The Trunk: ToolBuilder-Morphic-mt.186.mcz

commits at source.squeak.org commits at source.squeak.org
Tue Aug 16 16:01:11 UTC 2016


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

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

Name: ToolBuilder-Morphic-mt.186
Author: mt
Time: 16 August 2016, 6:01:05.580602 pm
UUID: f48e6eb7-0834-794d-b494-bdd58aa22d47
Ancestors: ToolBuilder-Morphic-mt.185

Reduce (additional) dependencies between packages.

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

Item was changed:
  ----- Method: MorphicToolBuilder>>open: (in category 'opening') -----
  open: anObject
  	"Build and open the object. Answer the widget opened."
  	| morph |
  	anObject isMorph 
  		ifTrue:[morph := anObject]
  		ifFalse:[morph := self build: anObject].
  	(morph isKindOf: MenuMorph)
  		ifTrue:[morph popUpInWorld: World].
  	(morph isKindOf: DialogWindow)
  		ifTrue: [^ morph moveToHand; getUserResponse].
  	(morph isKindOf: SystemWindow)
  		ifFalse:[morph openInWorld]
  		ifTrue:[
  			morph := morph openInWorldExtent: morph extent.
+ 			(Project uiManager openToolsAttachedToMouseCursor
- 			(self class openToolsAttachedToMouseCursor
  				and: [self currentEvent isMouse  and: [self currentEvent isMouseUp]])
  					ifTrue: [
  						morph setProperty: #initialDrop toValue: true.
  						morph hasDropShadow: false.
  						self currentHand attachMorph: morph]].
  	^morph!



More information about the Squeak-dev mailing list