[squeak-dev] The Trunk: Morphic-ct.2010.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Jun 22 13:11:08 UTC 2022


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

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

Name: Morphic-ct.2010
Author: ct
Time: 16 June 2022, 6:46:17.941852 pm
UUID: 7427f838-4f8f-7b49-99f5-d08cd9eeac53
Ancestors: Morphic-mt.2007

Proposal to fix z-order of docking bar menus when etoys mode is activated.

=============== Diff against Morphic-mt.2007 ===============

Item was added:
+ ----- Method: DockingBarMenuMorph>>popUpAdjacentTo:forHand:from: (in category 'as yet unclassified') -----
+ popUpAdjacentTo: rightOrLeftPoint forHand: hand from: sourceItem
+ 
+ 	| ownerInWorld world |
+ 	super popUpAdjacentTo: rightOrLeftPoint forHand: hand from: sourceItem.
+ 	
+ 	"Docking bar and protruding menu should appear visually merged. Move the source item behind the receiver. If we did it the other way around, other navigators and docking bars in front of the sourceItem would cover the receiver. For the same reason, we can't use a higher different morphic layer numbers for docking bar menus because this would hide them after all other navigators."
+ 	world := owner world.
+ 	ownerInWorld := sourceItem firstOwnerSuchThat: [:owner | owner owner == world].
+ 	world addMorph: ownerInWorld inFrontOf: self.!

Item was changed:
  ----- Method: DockingBarMorph>>add:icon:help:subMenu: (in category 'construction') -----
  add: wordingString icon: aForm help: helpString subMenu: aMenuMorph 
  	"Append the given submenu with the given label."
  	| item |
  	item := DockingBarItemMorph new.
  	item contents: wordingString.
  	item subMenu: aMenuMorph.
  	item icon: aForm.
  	helpString isNil
  		ifFalse: [item setBalloonText: helpString].
  	aMenuMorph ifNotNil: [
+ 		"Docking bar and protruding menu should appear visually merged."
+ 		aMenuMorph morphicLayerNumber: self morphicLayerNumber].
- 		aMenuMorph morphicLayerNumber: self morphicLayerNumber + 1].
  	self addMorphBack: item!

Item was changed:
  ----- Method: DockingBarMorph>>add:icon:selectedIcon:help:subMenu: (in category 'construction') -----
  add: wordingString icon: aForm selectedIcon: anotherForm help: helpString subMenu: aMenuMorph 
  	"Append the given submenu with the given label."
  	| item |
  	item := DockingBarItemMorph new
  		contents: wordingString;
  		subMenu: aMenuMorph;
  		icon: aForm;
  		selectedIcon: anotherForm.
  	helpString ifNotNil: [
  		item setBalloonText: helpString ].
  	aMenuMorph ifNotNil: [
+ 		"Docking bar and protruding menu should appear visually merged."
+ 		aMenuMorph morphicLayerNumber: self morphicLayerNumber].
- 		aMenuMorph morphicLayerNumber: self morphicLayerNumber + 1 ].
  	self addMorphBack: item!

Item was changed:
  ----- Method: DockingBarMorph>>addItem: (in category 'construction') -----
  addItem: aBlock
  	| item |
  	item := DockingBarItemMorph new.
  	aBlock value: item.
  	item subMenu ifNotNil: [:menu |
  		"Docking bar and protruding menu should appear visually merged."
+ 		menu morphicLayerNumber: self morphicLayerNumber].
- 		menu morphicLayerNumber: self morphicLayerNumber + 1].
  	self addMorphBack: item!

Item was changed:
  ----- Method: DockingBarMorph>>addUpdatingItem: (in category 'construction') -----
  addUpdatingItem: aBlock
  	| item |
  	item := DockingBarUpdatingItemMorph new.
  	aBlock value: item.
  	item subMenu ifNotNil: [:menu |
  		"Docking bar and protruding menu should appear visually merged."
+ 		menu morphicLayerNumber: self morphicLayerNumber].
- 		menu morphicLayerNumber: self morphicLayerNumber + 1].
  	self addMorphBack: item!



More information about the Squeak-dev mailing list