suzanne.soy/gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

.

Browse Source 
original commit: b4d52560889b71d6307f787ac2e4dce655522080
This commit is contained in:
Matthew Flatt 2002-08-27 12:26:24 +00:00
parent 0346079486
commit bb59496feb
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/framework/gui-utils.ss
View File

@ -531,7 +531,7 @@
;; label-font : font
(define label-font (send the-font-list find-or-create-font
12
(if (eq? (system-type) 'windows) 10 12)
'system 'normal
(if (eq? (system-type) 'macosx) 'bold 'normal)
#f))