--- a/WorkspaceApplication.st Wed Mar 10 16:39:27 2004 +0100
+++ b/WorkspaceApplication.st Wed Mar 10 17:29:06 2004 +0100
@@ -640,7 +640,7 @@
font := font onDevice:wsApp graphicsDevice ifAbsent:nil.
].
] ifFalse:[
- font := Font family:'Arial Unicode MS' face:'medium' style:'roman' size:12 encoding:'ms-ansi'.
+ font := Font family:'Arial Unicode MS' face:'medium' style:'roman' size:10 encoding:'ms-ansi'.
font := font onDevice:wsApp graphicsDevice ifAbsent:nil.
].
@@ -1317,5 +1317,5 @@
!WorkspaceApplication class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.76 2004-03-10 15:39:27 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/WorkspaceApplication.st,v 1.77 2004-03-10 16:29:06 ca Exp $'
! !