'From etoys2.1 of 8 August 2007 [latest update: #1625] on 12 September 2007 at 1:55:56 pm'!
"Change Set:		FontNameGlitch-yo
Date:			12 September 2007
Author:			Yoshiki Ohshima

Fix a sort of typo in the list of font names."!


!Preferences class methodsFor: 'fonts' stamp: 'yo 9/12/2007 13:51'!
restoreDefaultFontsForSqueakland
	"Since this is called from menus, we can take the opportunity to prompt for missing font styles."
	"
	Preferences restoreDefaultFontsForSqueakland
	"

	Preferences setDefaultFonts: #(
			(setListFontTo:			BitstreamVeraSans		12)
	        	(setFlapsFontTo:			BitstreamVeraSansBold	12)

			(setEToysButtonFontTo:	BitstreamVeraSans	12)
			(setEToysFontTo:			BitstreamVeraSansBold	12)
			(setEToysCodeFontTo:		BitstreamVeraSans		12)

			(setPaintBoxButtonFontTo:	BitstreamVeraSans	9)
			(setMenuFontTo:			BitstreamVeraSans		12)
			(setWindowTitleFontTo:	BitstreamVeraSans		15)
			(setBalloonHelpFontTo:	BitstreamVeraSans		12)

		).

! !