A new version of SUnitGUI was added to project The Inbox:
http://source.squeak.org/inbox/SUnitGUI-bp.50.mcz

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

Name: SUnitGUI-bp.50
Author: bp
Time: 22 November 2010, 8:53:09.668 pm
UUID: eb072196-893d-4822-8e86-09a113589786
Ancestors: SUnitGUI-ar.49

- fixed button height when resizing Test Runner

=============== Diff against SUnitGUI-ar.49 ===============

Item was changed:
  ----- Method: TestRunner>>buildWith: (in category 'building') -----
  buildWith: aBuilder
  	| window |
  	window := aBuilder pluggableWindowSpec new
  		model: self; label: self label; extent: self extent;
  		children: (OrderedCollection new 
  			add: ((self buildCategoriesWith: aBuilder)
+ 				frame: self categoriesFrame;
- 				frame: (0.00 @ 0.00 corner: 0.25 @ 0.92 );
  				yourself);
  			add: ((self buildClassesWith: aBuilder)
+ 				frame: self classesFrame;
- 				frame: (0.25 @ 0.00 corner: 0.50 @ 0.92 );
  				yourself);
  			add: ((self buildStatusWith: aBuilder)
+ 				frame: self statusFrame;
- 				frame: (0.50 @ 0.00 corner: 1.00 @ 0.08);
  				yourself);
  			add: ((self buildFailureListWith: aBuilder)
+ 				frame: self failureListFrame;
- 				frame: (0.50 @ 0.08 corner: 1.00 @ 0.50);
  				yourself);
  			add: ((self buildErrorListWith: aBuilder)
+ 				frame: self errorListFrame;
- 				frame: (0.50 @ 0.50 corner: 1.00 @ 0.92);
  				yourself);
  			add: ((self buildButtonsWith: aBuilder)
+ 				frame: self buttonsFrame;
- 				frame: (0.00 @ 0.92 corner: 1.00 @ 1.00);
  				yourself);
  			yourself);
  		yourself.
  	^ aBuilder build: window.!

Item was added:
+ ----- Method: TestRunner>>buttonHeight (in category 'building') -----
+ buttonHeight
+ 	^Preferences standardButtonFont height + 25!

Item was added:
+ ----- Method: TestRunner>>buttonsFrame (in category 'building') -----
+ buttonsFrame
+ 	^LayoutFrame new
+ 		leftFraction: 0 offset: 0;
+ 		topFraction: 1 offset: self buttonHeight negated;
+ 		rightFraction: 1 offset: 0;
+ 		bottomFraction: 1 offset: 0!

Item was added:
+ ----- Method: TestRunner>>categoriesFrame (in category 'building') -----
+ categoriesFrame
+ 	^LayoutFrame new
+ 		leftFraction: 0 offset: 0;
+ 		topFraction: 0 offset: 0;
+ 		rightFraction: 0.25 offset: 0;
+ 		bottomFraction: 1 offset: self buttonHeight negated + 4!

Item was added:
+ ----- Method: TestRunner>>classesFrame (in category 'building') -----
+ classesFrame
+ 	^LayoutFrame new
+ 		leftFraction: 0.25 offset: 0;
+ 		topFraction: 0 offset: 0;
+ 		rightFraction: 0.5 offset: 0;
+ 		bottomFraction: 1 offset: self buttonHeight negated + 4!

Item was added:
+ ----- Method: TestRunner>>errorListFrame (in category 'building') -----
+ errorListFrame
+ 	^LayoutFrame new
+ 		leftFraction: 0.5 offset: 0;
+ 		topFraction: 0.5 offset: 0;
+ 		rightFraction: 1 offset: 0;
+ 		bottomFraction: 1 offset: self buttonHeight negated + 4!

Item was added:
+ ----- Method: TestRunner>>failureListFrame (in category 'building') -----
+ failureListFrame
+ 	^LayoutFrame new
+ 		leftFraction: 0.5 offset: 0;
+ 		topFraction: 0 offset: self statusHeight;
+ 		rightFraction: 1 offset: 0;
+ 		bottomFraction: 0.5 offset: 0!

Item was added:
+ ----- Method: TestRunner>>statusFrame (in category 'building') -----
+ statusFrame
+ 	^LayoutFrame new
+ 		leftFraction: 0.5 offset: 0;
+ 		topFraction: 0 offset: 0;
+ 		rightFraction: 1 offset: 0;
+ 		bottomFraction: 0 offset: self statusHeight!

Item was added:
+ ----- Method: TestRunner>>statusHeight (in category 'building') -----
+ statusHeight
+ 	^Preferences standardCodeFont height * 2 + 5!