Marcel Taeumel uploaded a new version of ToolBuilder-Morphic to project The Trunk: http://source.squeak.org/trunk/ToolBuilder-Morphic-mt.177.mcz
==================== Summary ====================
Name: ToolBuilder-Morphic-mt.177 Author: mt Time: 2 August 2016, 2:13:33.624941 pm UUID: b6ea5aa5-8401-d647-8d21-be0397a0088e Ancestors: ToolBuilder-Morphic-mt.176
Fixes a bug where the parent of the current selection in a tree was not updated in the model when the model updated its current selection.
=============== Diff against ToolBuilder-Morphic-mt.176 ===============
Item was added: + ----- Method: PluggableTreeMorph>>selectedMorph: (in category 'selection') ----- + selectedMorph: aMorph + + super selectedMorph: aMorph. + + "If the update came from the model, make my state consistent again." + selectedWrapper := aMorph complexContents. + self setSelectedParentMorph: aMorph.!
Item was changed: ----- Method: PluggableTreeMorph>>setSelectedMorph: (in category 'selection') ----- setSelectedMorph: aMorph
selectedWrapper := aMorph complexContents. "Let the model now about the selected object, not wrapper." setSelectionSelector ifNotNil: [:symbol | model perform: symbol with: (selectedWrapper ifNotNil: [:w | w item])]. + + self setSelectedParentMorph: aMorph.! - - "The model may not have access to the parent object in terms of this tree structure." - setSelectedParentSelector ifNotNil: [:symbol | - model - perform: symbol - with: (selectedWrapper ifNotNil: [:w | w parent ifNotNil: [:pw | pw item]])].!
Item was added: + ----- Method: PluggableTreeMorph>>setSelectedParentMorph: (in category 'selection') ----- + setSelectedParentMorph: aMorph + + "The model may not have access to the parent object in terms of this tree structure." + setSelectedParentSelector ifNotNil: [:symbol | + model + perform: symbol + with: (selectedWrapper ifNotNil: [:w | w parent ifNotNil: [:pw | pw item]])].!
squeak-dev@lists.squeakfoundation.org