The Trunk: Morphic-mt.1276.mcz

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

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

Name: Morphic-mt.1276
Author: mt
Time: 13 August 2016, 6:45:52.669628 pm
UUID: e5626038-7071-954f-a49e-76ff67cee78a
Ancestors: Morphic-mt.1275

Makes project labels in nested projects have the correct font and color.

Fix look of docking bar when entering nested projects.

=============== Diff against Morphic-mt.1275 ===============

Item was changed:
  ----- Method: TheWorldMainDockingBar>>createDockingBar (in category 'construction') -----
  createDockingBar
  "Create a docking bar from the receiver's representation"
 
  | dockingBar |
  dockingBar := DockingBarMorph new
  adhereToTop;
- color: MenuMorph menuColor;
- autoGradient: MenuMorph gradientMenu;
  borderWidth: 0.
  self fillDockingBar: dockingBar.
  self labelIfNeeded: dockingBar.
  ^ dockingBar!

Item was changed:
  ----- Method: TheWorldMainDockingBar>>projectNameOn: (in category 'right side') -----
  projectNameOn: aDockingBar
  | morph |
  morph := StringMorph contents: ''.
+ morph
+ color: (self userInterfaceTheme textColor ifNil: [Color black]);
+ font: (self userInterfaceTheme font ifNil: [TextStyle defaultFont]).
  morph setProperty: #projectNameMorph toValue: #projectNameMorph.
  aDockingBar addMorphBack: morph.
  self labelIfNeeded: aDockingBar!