Frank Shearar uploaded a new version of Tests to project The Inbox:
http://source.squeak.org/inbox/Tests-fbs.159.mcz

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

Name: Tests-fbs.159
Author: fbs
Time: 17 August 2012, 10:24:45.024 am
UUID: 426c78f9-94a0-49ef-ae6f-a4e51724f738
Ancestors: Tests-eem.158

Utility method for accessing the branch name of a version.

=============== Diff against Tests-eem.158 ===============

Item was changed:
  ----- Method: MCVersionNameTest>>testBranches (in category 'tests') -----
  testBranches
  	| noBranch otherBranch withBranch |
  	noBranch :=  'Package-author.123.mcz' asMCVersionName.
  	withBranch := 'Package.branch-author.123.mcz' asMCVersionName.
  	otherBranch := 'Package.other-author.123.mcz' asMCVersionName.
  	self
  		assert: 'Package' equals: noBranch packageName;
  		assert: 'Package'  equals: withBranch packageName;
  		assert: 'Package-author.123' equals: noBranch versionName;
  		assert: 'Package.branch-author.123'  equals: withBranch versionName;
  		assert: 'Package' equals: noBranch packageAndBranchName;
  		assert: 'Package.branch' equals: withBranch packageAndBranchName;
+ 		assert: 'branch' equals: withBranch branchName;
+ 		assert: '' equals: noBranch branchName;
+ 		assert: 'other' equals: otherBranch branchName;
  		deny: noBranch = withBranch;
  		deny: withBranch = noBranch;
+ 		deny: withBranch = otherBranch.!
- 		deny: withBranch = otherBranch.
- 
- !