accessing
fromDictionary: aDictionary
	name := aDictionary at: #Name.
	category := ((aDictionary at: 'Asset Type') splitOn: '/') last copyReplaceAll: '_' with: ' '.
	abilities := self populateAbilities: (aDictionary  at: #Abilities)