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)
This commit is contained in:
Robby Findler 2011-09-27 16:24:23 -05:00
parent 53e8ff8c82
commit 34581b7050

View File

@ -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