Skip to content

Commit

Permalink
Default message when no watches in exploriants
Browse files Browse the repository at this point in the history
  • Loading branch information
JoeAtHPI committed Nov 24, 2023
1 parent 5ca7029 commit cf996a7
Show file tree
Hide file tree
Showing 2 changed files with 7 additions and 1 deletion.
5 changes: 4 additions & 1 deletion packages/Sandblocks-Babylonian/SBCluster.class.st
Original file line number Diff line number Diff line change
Expand Up @@ -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"
Expand Down
3 changes: 3 additions & 0 deletions packages/Sandblocks-Babylonian/SBExampleGridsView.class.st
Original file line number Diff line number Diff line change
Expand Up @@ -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]
]

Expand Down

0 comments on commit cf996a7

Please sign in to comment.