diff --git a/src/Spec2-Adapters-Morphic/SpTreeColumn.class.st b/src/Spec2-Adapters-Morphic/SpTreeColumn.class.st index 2f41b6c9..56a3d305 100644 --- a/src/Spec2-Adapters-Morphic/SpTreeColumn.class.st +++ b/src/Spec2-Adapters-Morphic/SpTreeColumn.class.st @@ -20,6 +20,7 @@ SpTreeColumn >> bindKeyCombination: aKMCombination toAction: aBlock [ SpTreeColumn >> rowMorphFor: aNode [ | node rowMorph | + node := aNode nodeModel. rowMorph := self rowMorphGetSelector ifNil: [node rowMorphForColumn: self] diff --git a/src/Spec2-Morphic-Backend-Tests/SpUIThemeDecoratorTest.class.st b/src/Spec2-Morphic-Backend-Tests/SpUIThemeDecoratorTest.class.st index 62d0ffd0..e1e32804 100644 --- a/src/Spec2-Morphic-Backend-Tests/SpUIThemeDecoratorTest.class.st +++ b/src/Spec2-Morphic-Backend-Tests/SpUIThemeDecoratorTest.class.st @@ -19,6 +19,8 @@ SpUIThemeDecoratorTest >> setUp [ { #category : 'tests' } SpUIThemeDecoratorTest >> testDoesNotUnderstand [ + + | block | themeDecorator property: #foo returnsValueOf: 42.