...
original commit: d23beec050e188049f736a5d46a2902db600a5a1
This commit is contained in:
parent
b8c8a65768
commit
241eae015d
|
@ -5868,7 +5868,7 @@
|
||||||
[(swiss) "Arial"]
|
[(swiss) "Arial"]
|
||||||
[(script) "Arial"]
|
[(script) "Arial"]
|
||||||
[(symbol) "Symbol"])]
|
[(symbol) "Symbol"])]
|
||||||
[(macos macosx)
|
[(macos)
|
||||||
(case family
|
(case family
|
||||||
[(system) "systemfont"]
|
[(system) "systemfont"]
|
||||||
[(default) "applicationfont"]
|
[(default) "applicationfont"]
|
||||||
|
@ -5877,6 +5877,16 @@
|
||||||
[(modern) "Monaco"]
|
[(modern) "Monaco"]
|
||||||
[(swiss) "Helvetica"]
|
[(swiss) "Helvetica"]
|
||||||
[(script) "Geneva"]
|
[(script) "Geneva"]
|
||||||
|
[(symbol) "Symbol"])]
|
||||||
|
[(macosx)
|
||||||
|
(case family
|
||||||
|
[(system) "systemfont"]
|
||||||
|
[(default) "applicationfont"]
|
||||||
|
[(roman) "Times"]
|
||||||
|
[(decorative) "Lucida Grande"]
|
||||||
|
[(modern) "Monaco"]
|
||||||
|
[(swiss) "Helvetica"]
|
||||||
|
[(script) "Geneva"]
|
||||||
[(symbol) "Symbol"])]))
|
[(symbol) "Symbol"])]))
|
||||||
|
|
||||||
(define (send-message-to-window x y m)
|
(define (send-message-to-window x y m)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user