'From etoys2.3 of 28 November 2007 [latest update: #1861] on 24 December 2007 at 3:35:46 pm'!

!ProjectNavigationMorph methodsFor: 'as yet unclassified' stamp: 'yo 12/24/2007 15:31'!
showMenuFor: aSymbol event: evt

	(aSymbol == #publishProject or: [aSymbol == #publishProjectSimple]) ifTrue: [
		self doPublishButtonMenuEvent: evt.
		^true		"we did show the menu"
	].
	(aSymbol == #findAProject or: [aSymbol == #findAProjectSimple]) ifTrue: [
		self doFindButtonMenuEvent: evt.
		^true		"we did show the menu"
	].

	(aSymbol == #stopSqueak) ifTrue: [
		self doStopButtonMenuEvent: evt.
		^true		"we did show the menu"
	].

	^false
! !

!ProjectNavigationMorph methodsFor: 'the actions' stamp: 'yo 12/24/2007 15:34'!
doStopButtonMenuEvent: evt

	| menu selection |

	menu _ CustomMenu new.
	menu 
		add: 'stop Etoys' translated action: [self stopSqueak];
		add: 'quit without saving' translated action: [SmalltalkImage current snapshot: false andQuit: true].

	selection _ menu build startUpCenteredWithCaption: 'Stop options' translated.
	selection ifNil: [^self].
	selection value.

! !