The Trunk: Morphic-mt.1286.mcz

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

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

Name: Morphic-mt.1286
Author: mt
Time: 16 August 2016, 5:59:18.265602 pm
UUID: b29ce81c-8358-b44c-ab48-ddf9aca710ab
Ancestors: Morphic-mt.1285

Reduce (additional) dependencies between packages.

=============== Diff against Morphic-mt.1285 ===============

Item was changed:
  ----- Method: SystemWindow>>justDroppedInto:event: (in category 'geometry') -----
  justDroppedInto: aMorph event: anEvent
 
  isCollapsed
  ifTrue: [self position: ((self position max: 0@0) grid: 8@8).
  collapsedFrame := self bounds]
  ifFalse: [fullFrame := self bounds].
 
  self beKeyWindow.
  self hasDropShadow: Preferences menuAppearance3d. "See #startDragFromLabel:."
 
  aMorph == self world ifTrue: [self assureLabelAreaVisible].
 
+ (Project uiManager openToolsAttachedToMouseCursor and: (self hasProperty: #initialDrop))
- (ToolBuilder openToolsAttachedToMouseCursor and: (self hasProperty: #initialDrop))
  ifTrue: [
  self removeProperty: #initialDrop.
  (self submorphs detect: [:m | m isKindOf: BottomRightGripMorph] ifNone: [])
  ifNotNil: [:grip |
  grip
  referencePoint: anEvent position;
  setProperty: #targetHadDropShadow toValue: true "See MorphicToolBuilder >> #open:".
  self hasDropShadow: false.
  anEvent hand newMouseFocus: grip]].
 
  ^super justDroppedInto: aMorph event: anEvent!