suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

use readonly version of Pango function

Browse Source
This commit is contained in:
Matthew Flatt 2010-10-29 13:59:16 -06:00
parent 03aee62647
commit 4e8f51741e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/racket/draw/private/dc.rkt
View File

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