*Socialmetrica
exportAsFileNamed: aName into: aFolder
	
	self pngExporter 
		zoomToShapes;
		noFixedShapes;
		fileName: (aFolder / (aName, 'png')) fullName;
		export.
	"self pdfExporter 
		zoomToShapes;
		noFixedShapes; 
		fileName: (aFolder / (aName, 'pdf')) fullName;
		export."
	^ aFolder / aName, 'png'