Marcel Taeumel uploaded a new version of SUnitGUI to project The Trunk:
http://source.squeak.org/trunk/SUnitGUI-mt.75.mcz

==================== Summary ====================

Name: SUnitGUI-mt.75
Author: mt
Time: 30 September 2019, 10:45:03.94271 am
UUID: e43de3a9-3b83-da40-b90b-2863acf012ef
Ancestors: SUnitGUI-mt.73

Adds a visible current selection to the category list. Should make UI experience more convenient.

=============== Diff against SUnitGUI-mt.73 ===============

Item was changed:
  Model subclass: #TestRunner
+ 	instanceVariableNames: 'categories categoryIndex categoriesSelected classes classIndex classesSelected failedList failedSelected errorList errorSelected lastUpdate result previousRun categoryPattern classPattern environment'
- 	instanceVariableNames: 'categories categoriesSelected classes classIndex classesSelected failedList failedSelected errorList errorSelected lastUpdate result previousRun categoryPattern classPattern environment'
  	classVariableNames: ''
  	poolDictionaries: ''
  	category: 'SUnitGUI'!
  
  !TestRunner commentStamp: '<historical>' prior: 0!
  <lint: #ignore rule: #classNotReferenced rational: 'this view is only accessed from menus'>
  
  !

Item was changed:
  ----- Method: TestRunner>>categorySelected (in category 'accessing-categories') -----
  categorySelected
+ 	^ categoryIndex!
- 	^ 0!

Item was changed:
  ----- Method: TestRunner>>categorySelected: (in category 'accessing-categories') -----
  categorySelected: anInteger
+ 	categoryIndex := anInteger.
  	self changed: #categorySelected.!