[squeak-dev] The Trunk: Installer-Core-nice.339.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Jun 11 20:11:15 UTC 2010


Nicolas Cellier uploaded a new version of Installer-Core to project The Trunk:
http://source.squeak.org/trunk/Installer-Core-nice.339.mcz

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

Name: Installer-Core-nice.339
Author: nice
Time: 11 June 2010, 10:11:09.662 pm
UUID: b88674dd-29f9-b344-a881-6f7be052613f
Ancestors: Installer-Core-nice.338

Use nextLine instead of to upTo: Character cr to make things work even if a LF has leaked in.

=============== Diff against Installer-Core-nice.338 ===============

Item was changed:
  ----- Method: InstallerUpdateStream>>parseUpdateListContents: (in category 'updates') -----
  parseUpdateListContents: listContentString
  	"Parse the contents of an updates.list into {{releaseTag. {fileNames*}}*}, and return it."
  
  	| sections releaseTag strm line fileNames |
  	sections := OrderedCollection new.
  	fileNames := OrderedCollection new: 1000.
  	releaseTag := nil.
  	strm := ReadStream on: listContentString.
  	[strm atEnd] whileFalse:
+ 		[line := strm nextLine.
- 		[line := strm upTo: Character cr.
  		line size > 0 ifTrue:
  			[line first = $#
  				ifTrue: [releaseTag ifNotNil: [sections addLast: {releaseTag. fileNames asArray}].
  						releaseTag := line allButFirst.
  						fileNames resetTo: 1]
  				ifFalse: [line first = $* ifFalse: [fileNames addLast: line]]]].
  	releaseTag ifNotNil: [sections addLast: {releaseTag. fileNames asArray}].
  	^ sections asArray
  !




More information about the Squeak-dev mailing list