[squeak-dev] The Trunk: MonticelloConfigurations-ul.113.mcz
commits at source.squeak.org
commits at source.squeak.org
Sat May 11 20:01:27 UTC 2013
Levente Uzonyi uploaded a new version of MonticelloConfigurations to project The Trunk:
http://source.squeak.org/trunk/MonticelloConfigurations-ul.113.mcz
==================== Summary ====================
Name: MonticelloConfigurations-ul.113
Author: ul
Time: 11 May 2013, 9:44:50.461 pm
UUID: ac476c46-69cb-4b92-831f-288fe2ea5646
Ancestors: MonticelloConfigurations-bf.112, MonticelloConfigurations-ul.112
Merged.
=============== Diff against MonticelloConfigurations-bf.112 ===============
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!
More information about the Squeak-dev
mailing list
|