The Trunk: PreferenceBrowser-ul.79.mcz

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

The Trunk: PreferenceBrowser-ul.79.mcz

commits-2
Levente Uzonyi uploaded a new version of PreferenceBrowser to project The Trunk:
http://source.squeak.org/trunk/PreferenceBrowser-ul.79.mcz

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

Name: PreferenceBrowser-ul.79
Author: ul
Time: 13 March 2017, 2:49:14.058201 pm
UUID: 16aaee27-e005-42ff-9a50-c459e07179f2
Ancestors: PreferenceBrowser-ul.78

SortedCollection Whack-a-mole

=============== Diff against PreferenceBrowser-ul.78 ===============

Item was changed:
  ----- Method: PreferenceBrowser>>allPreferences (in category 'accessing') -----
  allPreferences
+ ^ preferences allPreferences sort:
- ^ preferences allPreferences  asSortedCollection:
  [:pref1 :pref2 |
  pref1 viewRegistry viewOrder  <pref2 viewRegistry viewOrder  or:
  [pref1 viewRegistry viewOrder  =pref2 viewRegistry viewOrder
  &(pref1 name  <pref2 name)]]!

Item was changed:
  ----- Method: PreferenceBrowser>>categoryList (in category 'accessing') -----
  categoryList
  ^OrderedCollection new
  add:  self allCategoryLabel;
+ addAll: preferences categoryList sorted;
- addAll: preferences categoryList asSortedCollection;
  add: self searchResultsCategoryLabel;
  yourself.
 
  !

Item was changed:
  ----- Method: PreferenceBrowser>>preferencesInCategory: (in category 'accessing') -----
  preferencesInCategory: aCategory
+ ^(preferences preferencesInCategory: aCategory) sort:
- ^(preferences preferencesInCategory: aCategory) asSortedCollection:
  [:pref1 :pref2 |
  pref1 viewRegistry viewOrder  <pref2 viewRegistry viewOrder  or:
  [pref1 viewRegistry viewOrder  =pref2 viewRegistry viewOrder
  &(pref1 name  <pref2 name)]]!