The Trunk: Morphic-mt.1141.mcz

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

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

Name: Morphic-mt.1141
Author: mt
Time: 9 May 2016, 1:39:25.028729 pm
UUID: 7e799326-c73d-1d40-9a26-8ff96fc2d428
Ancestors: Morphic-mt.1140

Forgot one update due to latest full-screen changes.

=============== Diff against Morphic-mt.1140 ===============

Item was changed:
  ----- Method: TheWorldMainDockingBar>>toggleFullScreenOn: (in category 'right side') -----
  toggleFullScreenOn: aDockingBar
 
  | toggleMorph  box |
  toggleMorph := (SketchMorph withForm: MenuIcons smallFullscreenOffIcon).
 
  box := Morph new
  color: Color transparent;
  vResizing: #spaceFill;
  width: toggleMorph width;
  balloonText: 'toggle full screen mode' translated;
  addMorph: toggleMorph.
 
  toggleMorph setToAdhereToEdge: #rightCenter.
 
  box
  on: #mouseDown
  send: #value
  to:
+ [ DisplayScreen toggleFullScreen.
- [ Project current toggleFullScreen.
  toggleMorph form: MenuIcons smallFullscreenOffIcon ] ;
 
  on: #mouseEnter
  send: #value
  to: [toggleMorph form: MenuIcons smallFullscreenOnIcon];
 
  on: #mouseLeave
  send: #value
  to: [toggleMorph form: MenuIcons smallFullscreenOffIcon].
 
  aDockingBar addMorphBack: box!