[Pkg] The Trunk: Morphic-mt.1281.mcz

[commits at source.squeak.org]

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

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

Name: Morphic-mt.1281
Author: mt
Time: 15 August 2016, 6:26:40.945171 pm
UUID: 5209a7c6-1f5c-7347-952c-4e473aa20e92
Ancestors: Morphic-mt.1280

Fixes a bug with toggling soft shadows and updating existing windows in the image. (Thanks Karl!)

=============== Diff against Morphic-mt.1280 ===============

Item was changed:
  ----- Method: SystemWindow>>justDroppedInto:event: (in category 'geometry') -----
  justDroppedInto: aMorph event: anEvent
  
  	isCollapsed
  		ifTrue: [self position: ((self position max: 0 at 0) grid: 8 at 8).
  				collapsedFrame := self bounds]
  		ifFalse: [fullFrame := self bounds].
  
  	self beKeyWindow.
+ 	self hasDropShadow: Preferences menuAppearance3d. "See #startDragFromLabel:."
- 	self hasDropShadow: true. "See #startDragFromLabel:."
  			
  	aMorph == self world ifTrue: [self assureLabelAreaVisible].
  
  	(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!

Item was changed:
  ----- Method: TheWorldMainDockingBar>>toggleHardShadows (in category 'submenu - extras') -----
  toggleHardShadows
  
  	((Preferences valueOfFlag: #menuAppearance3d ifAbsent: [false]) and: [Morph useSoftDropShadow])
  		ifFalse: [Preferences toggle: #menuAppearance3d].
  	Morph useSoftDropShadow: false.
  	
+ 	SystemWindow refreshAllWindows; reconfigureWindowsForFocus.
+ 	self class updateInstances.
+ 	SystemProgressMorph reset.!
- 	(Smalltalk classNamed: #SystemWindow) ifNotNil: [:c |
- 		c refreshAllWindows; reconfigureWindowsForFocus].
- 	(Smalltalk classNamed: #TheWorldMainDockingBar) ifNotNil: [:c |
- 		c updateInstances].!

Item was changed:
  ----- Method: TheWorldMainDockingBar>>toggleSoftShadows (in category 'submenu - extras') -----
  toggleSoftShadows
  
  	((Preferences valueOfFlag: #menuAppearance3d ifAbsent: [false]) and: [Morph useSoftDropShadow not])
  		ifFalse: [Preferences toggle: #menuAppearance3d].
  	Morph useSoftDropShadow: true.
  	
+ 	SystemWindow refreshAllWindows; reconfigureWindowsForFocus.
+ 	self class updateInstances.
+ 	SystemProgressMorph reset.!
- 	(Smalltalk classNamed: #SystemWindow) ifNotNil: [:c |
- 		c refreshAllWindows; reconfigureWindowsForFocus].
- 	(Smalltalk classNamed: #TheWorldMainDockingBar) ifNotNil: [:c |
- 		c updateInstances].!