.
original commit: 9792a9a2843d9c2e388070b27c9ae5c647b699b5
This commit is contained in:
parent
3fe60f0a6c
commit
6adf352ebf
|
@ -6993,17 +6993,17 @@
|
||||||
[(decorative) "Geneva"]
|
[(decorative) "Geneva"]
|
||||||
[(modern) "Monaco"]
|
[(modern) "Monaco"]
|
||||||
[(swiss) "Helvetica"]
|
[(swiss) "Helvetica"]
|
||||||
[(script) "Geneva"]
|
[(script) "Zaph Chancery"]
|
||||||
[(symbol) "Symbol"])]
|
[(symbol) "Symbol"])]
|
||||||
[(macosx)
|
[(macosx)
|
||||||
(case family
|
(case family
|
||||||
[(system) "systemfont"]
|
[(system) "systemfont"]
|
||||||
[(default) "applicationfont"]
|
[(default) "applicationfont"]
|
||||||
[(roman) "Times"]
|
[(roman) "Times"]
|
||||||
[(decorative) "Lucida Grande"]
|
[(decorative) "Geneva"]
|
||||||
[(modern) "Monaco"]
|
[(modern) "Courier New"]
|
||||||
[(swiss) "Helvetica"]
|
[(swiss) "Helvetica"]
|
||||||
[(script) "Geneva"]
|
[(script) "Apple Chancery"]
|
||||||
[(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