accessing
exportEmptyHistogramNamed: aDictionary

	| histogram |
	histogram := RSChart new.
		histogram extent: (aDictionary at: 'extent').
		histogram build.
		histogram canvas exportAsFileNamed: (aDictionary at: 'messagesType'), '-histogram' into: self folder.
	^ self