Nicolas Cellier uploaded a new version of Installer-Core to project The Trunk:
http://source.squeak.org/trunk/Installer-Core-nice.90.mcz==================== Summary ====================
Name: Installer-Core-nice.90
Author: nice
Time: 21 October 2009, 12:25:53 pm
UUID: 9b622208-b525-419c-b7e0-230d25fd42fe
Ancestors: Installer-Core-nice.89
Use #keys rather than #fasterKeys
Note that pattern (x keys asArray sort) could as well be written (x keys sort) now that keys returns an Array...
This #asArray is here solely for cross-dialect/fork compatibility.
=============== Diff against Installer-Core-nice.89 ===============
Item was changed:
----- Method: Installer>>bug: (in category 'mantis') -----
bug: aBugNo
"
Installer mantis viewBug: 5639.
"
| page text |
self setBug: aBugNo.
page := self maPage.
text := String streamContents: [ :str |
#('Bug ID' 'Category' 'Severity' 'Reproducibility' 'Date Submitted'
'Date Updated' 'Reporter' 'View Status' 'Handler'
'Priority' 'Resolution' 'Status' 'Product Version' 'Summary' 'Description' 'Additional Information' )
do: [ :field |
| f |
f := self maRead: page field: field.
str nextPutAll: f key; nextPutAll: ': '; nextPutAll: f value; cr.
].
str nextPutAll: 'Notes: '; cr.
(self maReadNotes: page) do: [ :note | str nextPutAll: note; cr; cr ].
+ str nextPutAll: 'Files: '; nextPutAll: self maFiles keys asArray printString.
- str nextPutAll: 'Files: '; nextPutAll: self maFiles fasterKeys printString.
].
^ text
!