[Cuis-dev] [ENH] --- browser sorts method categories

Andres Valloud ten at smallinteger.com
Sat Dec 25 21:05:33 PST 2021


Hi, this change is so that browsers sort method categories. 
Specifically, the order proposed is

	-- all --
	all public categories, sorted ascending
	all private categories, sorted ascending

where public and private categories are mutually exclusive and private 
categories begin with 'private'.

Andres.
-------------- next part --------------
'From Cuis 5.0 [latest update: #4975] on 25 December 2021 at 9:00:42 pm'!

!Browser methodsFor: 'message category list' stamp: 'sqr 12/25/2021 21:00:11'!
rawMessageCategoryList

	| categories public private |
	selectedClassName isNil ifTrue: [^#()].
	categories := self classOrMetaClassOrganizer categories.
	private := categories select: [:x | x asLowercase beginsWith: 'private'].
	public := categories reject: [:x | private includes: x].
	^public sort, private sort! !


More information about the Cuis-dev mailing list