[squeak-dev] The Trunk: PreferenceBrowser-ul.79.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Mar 13 14:58:15 UTC 2017


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)]]!



More information about the Squeak-dev mailing list