Try this:
TextStyle changeDefaultFontSizeBy: 1

I filed out the code that does this, so you can browse TextStyle for more info.




 'From Squeak 2.2 of Sept 23, 1998 on 23 November 1998 at 2:47:00 pm'!

!TextStyle class methodsFor: 'instance creation' stamp: 'di 6/16/97 12:31'!
changeDefaultFontSizeBy: delta      "TextStyle changeDefaultFontSizeBy: 1"
	"This sample method recreates the default textStyle, with font 1 being a size
	larger than the smallest.  It then initializes most references in the system
	as well, although most windows will have to beclosed and reopened to get the effect."
	| allFonts |
	allFonts _ TextStyle default fontArray asSortedCollection: [:a :b | a height < b height].
	TextConstants at: #DefaultTextStyle put:
		(TextStyle fontArray: ((1 to: allFonts size) collect: [:i | allFonts atWrap: i+delta])).
	PopUpMenu initialize.  "Change this method for difft menu font"
	ListParagraph initialize.  "Change this method for difft ListPane font"
	StandardSystemView initialize.  "Change this method for difft Window label font"
! !

--

On Mon, 23 Nov 1998 15:24:41   Jeffrey J. Hallman wrote:
>I started Squeak 2.2 on NT, and found the fonts too small to read comfortably.
>What should I do?
>
>


-----== Sent via Deja News, The Discussion Network ==-----
http://www.dejanews.com/  Easy access to 50,000+ discussion forums