From 34581b7050e19bb75bdfe456e3b2dd2547ccd463 Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Tue, 27 Sep 2011 16:24:23 -0500
Subject: [PATCH] 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)
---
 collects/mrlib/image-core.rkt | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/collects/mrlib/image-core.rkt b/collects/mrlib/image-core.rkt
index 4d198b46b7..c151a926ce 100644
--- a/collects/mrlib/image-core.rkt
+++ b/collects/mrlib/image-core.rkt
@@ -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