Chris Muller uploaded a new version of Collections to project The Trunk:
http://source.squeak.org/trunk/Collections-cmm.797.mcz==================== Summary ====================
Name: Collections-cmm.797
Author: cmm
Time: 1 July 2018, 6:04:20.270181 pm
UUID: 00fa2143-c85b-4a5c-9615-2c45ae597af6
Ancestors: Collections-ul.796
Added String>>#condensedIntoOneLine to support new editing hot key.
=============== Diff against Collections-ul.796 ===============
Item was added:
+ ----- Method: String>>condensedIntoOneLine (in category 'converting') -----
+ condensedIntoOneLine
+ "Return a copy of the receiver with all separators converted to spaces, and with no consecutive spaces. A formatting tool."
+ ^ String streamContents:
+ [ : stream | | prior |
+ prior := $X. "any non-blank"
+ self withBlanksTrimmed do:
+ [ : char | char isSeparator ifTrue: [ prior isSeparator ifFalse: [stream space]] ifFalse: [ stream nextPut: char ].
+ prior := char ] ]!
Locked
