diff --git a/packages/Sandblocks-Babylonian/SBCluster.class.st b/packages/Sandblocks-Babylonian/SBCluster.class.st index db1e4b6e..72d3b8ed 100644 --- a/packages/Sandblocks-Babylonian/SBCluster.class.st +++ b/packages/Sandblocks-Babylonian/SBCluster.class.st @@ -116,7 +116,10 @@ SBCluster >> visualize [ self submorphs copy do: #delete. matrix := self buildDisplayMatrix. - matrix ifEmpty: [ ^ self]. + (matrix rowCount < 2 or: [matrix columnCount < 2]) + ifTrue:[ + self addMorph: (SBOwnTextMorph new contents: 'No watches to display'). + ^ self]. self addAllMorphsBack: { self newTopRowFrom: (matrix atRow: 1) allButFirst. "ignore placeholder morph" diff --git a/packages/Sandblocks-Babylonian/SBExampleGridsView.class.st b/packages/Sandblocks-Babylonian/SBExampleGridsView.class.st index 573c9ff9..ece2e6bb 100644 --- a/packages/Sandblocks-Babylonian/SBExampleGridsView.class.st +++ b/packages/Sandblocks-Babylonian/SBExampleGridsView.class.st @@ -7,6 +7,9 @@ Class { { #category : #building } SBExampleGridsView >> buildAllPossibleResults [ + self multiverse activeExamples + ifEmpty: [gridContainer addMorph: (SBOwnTextMorph new contents: 'No examples active')]. + self multiverse activeExamples withIndexDo: [:anExample :anIndex | self buildExampleFor: anIndex] ]