[etoys-dev] Etoys: Sugar-bf.4.mcz

[commits at source.squeak.org]

Bert Freudenberg uploaded a new version of Sugar to project Etoys:
http://source.squeak.org/etoys/Sugar-bf.4.mcz

==================== Summary ====================

Name: Sugar-bf.4
Author: bf
Time: 20 August 2010, 10:10:44 am
UUID: 13bd635c-f127-404d-8574-11add89a2877
Ancestors: Sugar-bf.3

- showAdvancedNavigatorButtons preference toggles 'new project' button

=============== Diff against Sugar-bf.3 ===============

Item was changed:
  ----- Method: SugarNavigatorBar>>makeTheButtons (in category 'initialization') -----
  makeTheButtons
+ 
+ 	^ {
+ 		self buttonHelp.
+ 		self makeProjectNameLabel.
+ 	},
+ 	(
+ 		Preferences showAdvancedNavigatorButtons
+ 			ifTrue: [{self buttonNewProject}]
+ 			ifFalse: [#()]
+ 	),
+ 	{
+ 		self buttonPrev.
+ 		self buttonNext.
+ 		self buttonPaint.
+ 		self buttonSupplies.
+ 		self buttonLanguage.
+ 	}, 
+ 	(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: [#()])!
- 	^self makeTheSimpleButtons
- !

Item was removed:
- ----- Method: SugarNavigatorBar>>makeTheSimpleButtons (in category 'initialization') -----
- 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: [#()])!