From 4e8f51741e6788f888e986dfa2165d16af761353 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Fri, 29 Oct 2010 13:59:16 -0600 Subject: [PATCH] use readonly version of Pango function --- collects/racket/draw/private/dc.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/racket/draw/private/dc.rkt b/collects/racket/draw/private/dc.rkt index 7b0cafcf1c..6db3066948 100644 --- a/collects/racket/draw/private/dc.rkt +++ b/collects/racket/draw/private/dc.rkt @@ -1348,7 +1348,7 @@ (let ([bl (- flh ld)]) (align-y/delta (+ y bl) 0))) ;; Here's the draw command, which uses most of the time in this mode: - (pango_cairo_show_layout_line cr (pango_layout_get_line layout 0))) + (pango_cairo_show_layout_line cr (pango_layout_get_line_readonly layout 0))) (values (if blank? 0.0 (+ w lw)) (max h lh) (max d ld) (max a la)))))) (when rotate? (cairo_restore cr))))))))