[Pkg] The Trunk: Monticello-bf.516.mcz

[commits at source.squeak.org]

Bert Freudenberg uploaded a new version of Monticello to project The Trunk:
http://source.squeak.org/trunk/Monticello-bf.516.mcz

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

Name: Monticello-bf.516
Author: bf
Time: 5 July 2012, 5:07:51.433 pm
UUID: 42f8b4e0-b227-46ec-bcfa-a0426a152467
Ancestors: Monticello-bf.515

Fix a problem with very short MCVersionNames (e.g. 'MC1' as used by the test suite)

=============== Diff against Monticello-bf.515 ===============

Item was changed:
  ----- Method: MCVersionName>>versionName (in category 'accessing') -----
  versionName
  	"Answer my version name as a ByteString, without the file suffix or any ancestor-attributes."
  	| end |
  	self isEmpty ifTrue: [^ String empty]. 
  	end := self indexOf: $( ifAbsent: [
+ 		(self size > 4 and: [(self copyFrom: self size - 3 to: self size - 1) = '.mc'])
- 		('.mc#' startingAt: 1 match: self startingAt: self size - 3)
  			ifTrue: [self size - 3]
  			ifFalse: [self size + 1]].
  	^self first: end - 1!