'From etoys4.0 of 9 October 2008 [latest update: #2301] on 13 September 2009 at 8:47:31 pm'!
"Change Set:		noUndoButton-sw
Date:			13 September 2009
Author:			Scott Wallace

SQ-378 -- remove the undo button from the navigator bar.  This change-set removes the undo item from all the variants of project-navigator-bar.
bf: Postscript rebuilds nav bar."!


!ProjectNavigationMorph methodsFor: 'buttons' stamp: 'sw 9/13/2009 20:43'!
makeTheAdvancedButtons

	^{
		self buttonNewProject.
		self buttonShare.
		self buttonPrev.
		self buttonNext.
		self buttonPublish.
		self buttonNewer.
		self buttonTell.
		self buttonFind.
		self buttonFullScreen.
		"self buttonFlaps."
		self buttonPaint.
	},
	(
		Preferences includeSoundControlInNavigator ifTrue: [{self buttonSound}] ifFalse: [#()]
	),
	{
		self buttonLanguage.
		"self buttonUndo."
		self buttonQuit.
	}
! !

!ProjectNavigationMorph methodsFor: 'buttons' stamp: 'sw 9/13/2009 20:41'!
makeTheSimpleButtons
	"Add the buttons for use in normal kids' mode."

	^{
		self buttonNewProject.

		self buttonPrev.
"		self buttonNext."
		self buttonPublish.
		self buttonFind.
"		self buttonFullScreen."

		self buttonPaint.
	},
	(
		Preferences includeSoundControlInNavigator ifTrue: [{self buttonSound}] ifFalse: [#()]
	),
	{
		self buttonLanguage.
		"self buttonUndo."
		self buttonQuit.
	}
! !


!SugarNavigatorBar methodsFor: 'initialization' stamp: 'sw 9/13/2009 20:36'!
makeTheSimpleButtons
	"Add the buttons for use in normal kids' mode."

	^ {self buttonHelp.
		self makeProjectNameLabel.
		"self buttonNewProject."

		self buttonPrev.
		self buttonNext.

		self buttonPaint.
		self buttonSupplies.
	},
"	(
		Preferences includeSoundControlInNavigator ifTrue: [{self buttonSound}] ifFalse: [#()]
	),"
	{
		"self buttonUndo."
		self buttonLanguage.
	}, 
	"see zoomAndShareButtonAppearance"
	(SugarLauncher isRunningInSugar
		ifTrue: [{
			self buttonShare.
			#spacer.
			self buttonChoose.
			self buttonKeep.
			self buttonStop.
			}]
		ifFalse: [{
			self buttonZoom.
			#spacer.
			self buttonFind.
			self buttonPublish.
			self buttonQuit}]
	),
	(Preferences navControlInNavBar
		ifTrue: [{self buttonHideNavBar}]
		ifFalse: [#()])! !

!SugarNavigatorBar methodsFor: 'initialization' stamp: 'sw 9/13/2009 20:36'!
makeTheSimpleButtonsSqueakland
	"Add the buttons for use in normal kids' mode."

	^ {self buttonHelp},
	{
		self makeProjectNameLabel.

		self buttonNewProject.
		self buttonPrev.
		self buttonNext.

		self buttonPaint.
		self buttonSupplies.
	},
"	(
		Preferences includeSoundControlInNavigator ifTrue: [{self buttonSound}] ifFalse: [#()]
	),"
	{
	"	self buttonUndo."
		self buttonLanguage.
		"self buttonShare."
		
	}, 
	(((DisplayScreen actualScreenSize = OLPCVirtualScreen virtualScreenExtent)
		ifFalse: [{self buttonZoom}]
		ifTrue: [#()])),

	{	#spacer.
		self buttonFind.
		self buttonPublish.

		self buttonQuit.
		},

	(Preferences navControlInNavBar
		ifTrue: [{self buttonHideNavBar}]
		ifFalse: [#()])

! !


!InteriorSugarNavBar methodsFor: 'initialization' stamp: 'sw 9/13/2009 20:40'!
makeTheSimpleButtons
	"Add the buttons for use in normal kids' mode."

	^{
		self buttonPaint.
		self buttonSupplies.
		"self buttonUndo."
		#spacer.

			}! !

"Postscript:"
Flaps disableGlobalFlaps: false.
Flaps enableEToyFlaps.
!