accessing
abilities
^ abilities ifNil: [ abilities := Dictionary new
at: 'enabled' put: OrderedCollection new;
at: 'disabled' put: OrderedCollection new;
yourself ]