try using size-in-pixels for the font primitive in 2htdp/image
closes PR 11883 (the earlier commit with this message was just completely bogus) original commit: 34581b7050e19bb75bdfe456e3b2dd2547ccd463
This commit is contained in:
parent
f0ee216da1
commit
68dcb92030
|
@ -1095,14 +1095,18 @@ the mask bitmap and the original bitmap are all together in a single bytes!
|
|||
(text-family text)
|
||||
(text-style text)
|
||||
(text-weight text)
|
||||
(text-underline text))]
|
||||
(text-underline text)
|
||||
'default
|
||||
#t)]
|
||||
[else
|
||||
(send the-font-list find-or-create-font
|
||||
adjusted-size
|
||||
(text-family text)
|
||||
(text-style text)
|
||||
(text-weight text)
|
||||
(text-underline text))]))
|
||||
(text-underline text)
|
||||
'default
|
||||
#t)]))
|
||||
|
||||
(define (ellipse-rotated-size ew eh θ)
|
||||
(cond
|
||||
|
|
Loading…
Reference in New Issue
Block a user