Andreas Raab uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-ar.252.mcz==================== Summary ====================
Name: System-ar.252
Author: ar
Time: 13 February 2010, 3:52:02.911 pm
UUID: bb256030-e057-fc41-9d2f-a50f47d2b8cf
Ancestors: System-cmm.251
Use withBlanksTrimmed, not trimBlanks (which doesn't exist in Squeak).
=============== Diff against System-cmm.251 ===============
Item was changed:
----- Method: String>>suggestedTypeNames (in category '*system') -----
suggestedTypeNames
^ Array streamContents:
[ : stream |
self withIndexDo:
[ : eachChar : index |
eachChar isUppercase ifTrue:
[ stream nextPut:
(self
copyFrom: index
+ to: self size) withBlanksTrimmed.
- to: self size) trimBlanks.
"Often, argument names that refer to Collections end in the letter s, which can cause the suggested type-name to not be found. Account for this."
self last = $s
ifTrue:
[ stream nextPut:
(self
copyFrom: index
+ to: self size-1) withBlanksTrimmed ] ] ] ]!
- to: self size-1) trimBlanks ] ] ] ]!