'From Cuis 2.0 of 12 February 2010 [latest update: #418] on 18 February 2010 at 10:20:50 am'!

!Morph methodsFor: 'menus' stamp: 'jmv 2/18/2010 10:17'!
addExportMenuItems: aMenu hand: aHandMorph
	"Add export items to the menu"

	aMenu ifNotNil: [
		| aSubMenu |
		aSubMenu _ MenuMorph new defaultTarget: self.
		aSubMenu add: 'BMP file' translated action: #exportAsBMP.
		aSubMenu add: 'JPEG file' translated action: #exportAsJPEG.
		aSubMenu add: 'PNG file' translated action: #exportAsPNG.
		aMenu add: 'export...' translated subMenu: aSubMenu]
! !

Morph removeSelector: #exportAsGIF!
Smalltalk removeClassNamed: #GIFReadWriter!
