The Inbox: MonticelloConfigurations-ul.112.mcz

A new version of MonticelloConfigurations was added to project The Inbox:
http://source.squeak.org/inbox/MonticelloConfigurations-ul.112.mcz

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

Name: MonticelloConfigurations-ul.112
Author: ul
Time: 4 May 2013, 12:13:59.367 am
UUID: 8a5b7d86-64e4-47aa-baa7-402c9167b39c
Ancestors: MonticelloConfigurations-fbs.111

- allow using the cache for #allFileNames in MCMcmUpdater class >> #updateListFor: in order to speed it up (don't fetch it twice during a Trunk update)
- don't use SortedCollection; use OrderedCollection and #sort instead, because it's faster in the same method

=============== Diff against MonticelloConfigurations-fbs.111 ===============

Item was changed:
  ----- Method: MCMcmUpdater class>>updateListFor: (in category 'private') -----
  updateListFor: repo
+
  | updateList allNames minVersion |
+ updateList := OrderedCollection new.
- updateList := SortedCollection new.
  minVersion := LastUpdateMap at: repo description ifAbsent: [0].
  "Find all the updates-author.version.mcm files"
+ allNames := 'Checking ', repo description
- 'Checking ', repo description
  displayProgressFrom: 0 to: 1 during: [:bar|
  bar value: 0.
+ repo allFileNamesOrCache ].
- allNames := repo allFileNames].
  allNames do: [:versionedName | | version base parts author type |
  parts := versionedName findTokens: '.-'.
  parts size = 4 ifTrue: [
  base := parts at: 1.
  author := parts at: 2.
  version := [(parts at: 3) asNumber] on: Error do: [:ex | ex return: 0].
  type := parts at: 4.
  ].
  (base = 'update' and: [version >= minVersion and: [type = 'mcm']])
  ifTrue: [updateList add: version -> versionedName]].
+ ^updateList sort!
- ^updateList!