Frank Shearar uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-fbs.527.mcz

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

Name: System-fbs.527
Author: fbs
Time: 2 May 2013, 8:40:31.395 am
UUID: 74e034c0-22c8-4a90-b2fa-2ef759608d77
Ancestors: System-cwp.526

Move the SmallLand themes/preferences to the SmallLand-ColorTheme package.

=============== Diff against System-cwp.526 ===============

Item was removed:
- ----- Method: Preferences class>>smallLand (in category 'themes') -----
- smallLand
- 	"Small-Land theme. It install the complete Small-Land theme  
- 	(Preferences, Fonts, Colors, etc)"
- 	" 
- 	Preferences smallLand.  
- 	"
- 	self smallLandPreferences.
- 	self smallLandFonts.
- 	SmallLandColorTheme current apply!

Item was removed:
- ----- Method: Preferences class>>smallLandBigFonts (in category 'themes - small-land') -----
- smallLandBigFonts
- 	"private - change the fonts to small-land's choices"
- 
- 	"
- 	Preferences smallLandBigFonts.
- 	"
- 
- 	#(
- 		(setButtonFontTo:			#BitstreamVeraSansMono	15)
- 
- 		(setListFontTo:				#BitstreamVeraSans		15)
- 		(setMenuFontTo:			#BitstreamVeraSans		15)
- 		(setSystemFontTo:			#BitstreamVeraSans		15)
- 
- 		(setWindowTitleFontTo:	#BitstreamVeraSans		15)
- 
- 		(setCodeFontTo:				#BitstreamVeraSerif		15)
- 
- 		(setFlapsFontTo:				#KomikaText					24)
- 		(setEToysFontTo:			#KomikaText					24)
- 		(setHaloLabelFontTo:		#KomikaText					24)
- 		(setEToysTitleFontTo:		#KomikaText					36)
-  	)
- 		do: [:triplet |
- 			Preferences
- 				perform: triplet first
- 				with: (StrikeFont familyName: triplet second pointSize: triplet third)
- 		].
- 
- 	BalloonMorph setBalloonFontTo: (StrikeFont familyName: #BitstreamVeraSans pointSize: 15).
- !

Item was removed:
- ----- Method: Preferences class>>smallLandFonts (in category 'themes - small-land') -----
- smallLandFonts
- 	"private - change the fonts to small-land's  
- 	choices"
- 	" 
- 	Preferences smallLandFonts.  
- 	"
- 	Preferences bigDisplay
- 		ifTrue: [^ self smallLandBigFonts].
- 	Preferences tinyDisplay
- 		ifTrue: [^ self smallLandTinyFonts].
- 	self smallLandSmallFonts!

Item was removed:
- ----- Method: Preferences class>>smallLandPreferences (in category 'themes - small-land') -----
- smallLandPreferences
- 	"Private - change the preferences according to small-land taste"
- 
- 	self setPreferencesFrom: #(
- 		(haloEnclosesFullBounds true)
- 		(showBoundsInHalo       true)
- 		(cmdGesturesEnabled	false)
- 		(easySelection			true)
- 		(abbreviatedBrowserButtons       true)
- 		(alternativeBrowseIt             true)
- 		(alwaysShowVScrollbar            false)
- 		(annotationPanes                 true)
- 		(balloonHelpInMessageLists       true)
- 		(browseWithDragNDrop             true)
- 		(browseWithPrettyPrint           true)
- 		(classicNewMorphMenu             true)
- 		(collapseWindowsInPlace          true)
- 		(diffsWithPrettyPrint            true)
- 		(dragNDropWithAnimation          true)
- 		(duplicateControlAndAltKeys      true)
- 		(eToyFriendly                    true)
- 		(extraDebuggerButtons            true)
- 		(extractFlashInHighestQuality    true)
- 		(fastDragWindowForMorphic        false)
- 		(includeSoundControlInNavigator  true)
- 		(menuKeyboardControl             true)
- 		(menuAppearance3d			false)
- 		(gradientMenu					false)
- 		(mouseOverForKeyboardFocus       true)
- 		(optionalButtons                 true)
- 		(preserveTrash                   true)
- 		(projectViewsInWindows           true)
- 		(propertySheetFromHalo           true)
- 		(scrollBarsNarrow                true)
- 		(scrollBarsOnRight               true)
- 		(selectiveHalos                  true)
- 		(showDirectionForSketches        true)
- 		(showDirectionHandles            true)
- 		(slideDismissalsToTrash          true)
- 		(translationWithBabel            true)
- 		(unlimitedPaintArea              true)
- 		(unlimitedPaintArea              true)
- 
- 		(menuColorFromWorld false)
- 		(noviceMode true)
- 		(uniqueNamesInHalos true)
- 		(infiniteUndo true)
- 		(useUndo true)
- 		(soundStopWhenDone true)
- 	).
- 
- 	self setParameter: #balloonHelpDelayTime to: 100.
- !

Item was removed:
- ----- Method: Preferences class>>smallLandSmallFonts (in category 'themes - small-land') -----
- smallLandSmallFonts
- 	"private - change the fonts to small-land's choices"
- 
- 	"
- 	Preferences smallLandFonts.
- 	"
- 
- 	#(
- 		(setButtonFontTo:			#BitstreamVeraSansMono	12)
- 
- 		(setListFontTo:				#BitstreamVeraSans		12)
- 		(setMenuFontTo:			#BitstreamVeraSans		12)
- 		(setSystemFontTo:			#BitstreamVeraSans		12)
- 
- 		(setWindowTitleFontTo:	#BitstreamVeraSans		15)
- 
- 		(setCodeFontTo:				#BitstreamVeraSerif		12)
- 
- 		(setFlapsFontTo:				#KomikaText					15)
- 		(setEToysFontTo:			#KomikaText					15)
- 		(setHaloLabelFontTo:		#KomikaText					15)
- 		(setEToysTitleFontTo:		#KomikaText					24)
-  	)
- 		do: [:triplet |
- 			Preferences
- 				perform: triplet first
- 				with: (StrikeFont familyName: triplet second pointSize: triplet third)
- 		].
- 
- 	BalloonMorph setBalloonFontTo: (StrikeFont familyName: #BitstreamVeraSans pointSize: 12).
- !

Item was removed:
- ----- Method: Preferences class>>smallLandTinyFonts (in category 'themes - small-land') -----
- smallLandTinyFonts
- 	"private - change the fonts to small-land's choices"
- 
- 	"
- 	Preferences smallLandTinyFonts.
- 	"
- 
- 	#(
- 		(setButtonFontTo:			#AccujenMono	9)
- 
- 		(setListFontTo:				#Accujen		9)
- 		(setMenuFontTo:			#Accujen		9)
- 		(setSystemFontTo:			#Accujen		9)
- 
- 		(setWindowTitleFontTo:	#Accujen		10)
- 
- 		(setCodeFontTo:				#Accuny		9)
- 
- 		(setFlapsFontTo:				#Atlanta		11)
- 		(setEToysFontTo:			#Atlanta		11)
- 		(setHaloLabelFontTo:		#Atlanta		11)
- 		(setEToysTitleFontTo:		#Atlanta		11)
-  	)
- 		do: [:triplet |
- 			Preferences
- 				perform: triplet first
- 				with: (StrikeFont familyName: triplet second pointSize: triplet third)
- 		].
- 
- 	BalloonMorph setBalloonFontTo: (StrikeFont familyName: #Accujen pointSize: 9).
- !