Marcel Taeumel uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-mt.855.mcz==================== Summary ====================
Name: Morphic-mt.855
Author: mt
Time: 10 April 2015, 3:18:14.893 pm
UUID: 7ce3c391-82b8-c74b-a17b-d03774336ec9
Ancestors: Morphic-mt.854
Fixed category.
=============== Diff against Morphic-mt.854 ===============
Item was changed:
+ ----- Method: Morph>>handlerForMouseDown: (in category 'event handling') -----
- ----- Method: Morph>>handlerForMouseDown: (in category 'event handling-override') -----
handlerForMouseDown: anEvent
"Return the (prospective) handler for a mouse down event. The handler is temporarily
installed and can be used for morphs further down the hierarchy to negotiate whether
the inner or the outer morph should finally handle the event."
anEvent blueButtonPressed
ifTrue: [^ self handlerForBlueButtonDown: anEvent].
anEvent yellowButtonPressed
ifTrue: [^ self handlerForYellowButtonDown: anEvent].
anEvent controlKeyPressed
ifTrue: [^ self handlerForMetaMenu: anEvent].
(self handlesMouseDown: anEvent)
ifFalse: [^ nil]. "not interested"
anEvent handler
ifNil: [^ self ]. "Same priority but I am innermost"
"Nobody else was interested"
^self mouseDownPriority >= anEvent handler mouseDownPriority
ifTrue: [ self]
ifFalse: [ nil]!
Locked
