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

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

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

commits-2
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
  !