[Pkg] The Trunk: SUnitGUI-eem.66.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Mar 15 16:07:06 UTC 2017


Eliot Miranda uploaded a new version of SUnitGUI to project The Trunk:
http://source.squeak.org/trunk/SUnitGUI-eem.66.mcz

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

Name: SUnitGUI-eem.66
Author: eem
Time: 15 March 2017, 9:06:24.485173 am
UUID: d784d744-8f17-4d16-a2a9-25a399bed280
Ancestors: SUnitGUI-jr.65

Fix Browse in the TestRunner.  The old code always set classIndex to zero when updating the selected classes, which disables browseClass.

=============== Diff against SUnitGUI-jr.65 ===============

Item was changed:
  ----- Method: TestRunner>>updateClasses (in category 'updating') -----
  updateClasses
  	| classesForCategories |
  	classesForCategories := self findClassesForCategories: categoriesSelected.
  	classes := classesForCategories asArray
  		sort: [ :a :b | self sortClass: a before: b ].
- 	classIndex := 0.
  	classesSelected := classesSelected isNil
  		ifTrue: [ classesForCategories ]
  		ifFalse: [ 
  			classesSelected
  				select: [ :each | classesForCategories includes: each ] ].
+ 	classIndex isInteger ifTrue:
+ 		[(classesSelected includes: (classes at: classIndex ifAbsent: [])) ifFalse:
+ 			[classIndex := 0]].
  	self changed: #classList; changed: #classSelected; changed: #hasRunnable.!



More information about the Packages mailing list