...
original commit: 306ac214d207477f7643cfdffd8ee482f9d22c26
This commit is contained in:
parent
c1467860ae
commit
687cff5646
|
@ -37,6 +37,14 @@
|
||||||
(define frame-mixin values)
|
(define frame-mixin values)
|
||||||
(define (user-defined-doc-position x) #f)
|
(define (user-defined-doc-position x) #f)
|
||||||
|
|
||||||
|
(preferences:set-default
|
||||||
|
'drscheme:font-size
|
||||||
|
(send (send (send (make-object text%)
|
||||||
|
get-style-list)
|
||||||
|
basic-style)
|
||||||
|
get-size)
|
||||||
|
(lambda (x) (and (number? x) (exact? x) (= x (floor x)))))
|
||||||
|
|
||||||
(define-values/invoke-unit/sig help:help^
|
(define-values/invoke-unit/sig help:help^
|
||||||
(require-relative-library "helpr.ss")
|
(require-relative-library "helpr.ss")
|
||||||
#f
|
#f
|
||||||
|
|
Loading…
Reference in New Issue
Block a user