The Trunk: MonticelloConfigurations-ul.150.mcz

Levente Uzonyi uploaded a new version of MonticelloConfigurations to project The Trunk:
http://source.squeak.org/trunk/MonticelloConfigurations-ul.150.mcz

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

Name: MonticelloConfigurations-ul.150
Author: ul
Time: 13 March 2017, 2:39:52.445035 pm
UUID: 1a830f68-298a-46d1-aebb-e057733c9a93
Ancestors: MonticelloConfigurations-bf.149

SortedCollection Whack-a-mole

=============== Diff against MonticelloConfigurations-bf.149 ===============

Item was changed:
  ----- Method: MCConfigurationBrowser>>pickWorkingCopiesSatisfying: (in category 'morphic ui') -----
  pickWorkingCopiesSatisfying: aBlock
  | copies item |
  copies := (MCWorkingCopy allManagers select: aBlock)
+ sort: [:a :b | a packageName <= b packageName].
- asSortedCollection: [:a :b | a packageName <= b packageName].
  item := UIManager default chooseFrom: #('match ...'),(copies collect: [:ea | ea packageName]) lines: #(1) title: 'Package:'.
  item = 1 ifTrue: [
  | pattern |
  pattern := UIManager default request: 'Packages matching:' initialAnswer: '*'.
  ^pattern isEmptyOrNil
  ifTrue: [#()]
  ifFalse: [
  (pattern includes: $*) ifFalse: [pattern := '*', pattern, '*'].
  copies select: [:ea | pattern match: ea packageName]]
  ].
  ^ item = 0
  ifTrue: [#()]
  ifFalse: [{copies at: item - 1}]!