The Trunk: Installer-Core-nice.339.mcz

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
  !