Skip to content

Commit

Permalink
Cleanup: TestCase class>>#lastRunMethodNamed:
Browse files Browse the repository at this point in the history
Fix #16587
  • Loading branch information
astares committed May 6, 2024
1 parent 94539ac commit a9f85a2
Showing 1 changed file with 8 additions and 3 deletions.
11 changes: 8 additions & 3 deletions src/SUnit-Core/TestCase.class.st
Original file line number Diff line number Diff line change
Expand Up @@ -401,9 +401,14 @@ TestCase class >> lastRun [
{ #category : 'history' }
TestCase class >> lastRunMethodNamed: aSelector [

^ String streamContents: [:str |
str nextPutAll: aSelector asString ;cr.
str tab; nextPutAll: '^ ', (self lastRun) storeString]
^ String streamContents: [ :str |
str
nextPutAll: aSelector asString;
cr.
str
tab;
nextPutAll: '^ ';
nextPutAll: self lastRun storeString ]
]

{ #category : 'history' }
Expand Down

0 comments on commit a9f85a2

Please sign in to comment.