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

commits at source.squeak.org commits at source.squeak.org
Mon May 9 11:40:02 UTC 2016


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!



More information about the Squeak-dev mailing list