racket/draw: fix problems related to failed font fallbacks
This commit is contained in:
parent
4ca6e3c452
commit
7d6dc98e0e
|
@ -1522,7 +1522,7 @@
|
|||
(/ (PangoRectangle-width logical)
|
||||
(exact->inexact PANGO_SCALE)))]
|
||||
[flh (/ orig-h (exact->inexact PANGO_SCALE))]
|
||||
[ld (/ (- orig-h baseline) (exact->inexact PANGO_SCALE))]
|
||||
[ld (exact->inexact (/ (- orig-h baseline) (exact->inexact PANGO_SCALE)))]
|
||||
[la 0.0])
|
||||
(let ([lh (ceiling flh)])
|
||||
(when cache
|
||||
|
|
|
@ -85,7 +85,7 @@
|
|||
;; Inline PangoAnalysis:
|
||||
[shape_engine _pointer]
|
||||
[lang_engine _pointer]
|
||||
[font PangoFont]
|
||||
[font (_or-null PangoFont)]
|
||||
[level _uint8]
|
||||
[gravity _uint8]
|
||||
[flags _uint8]
|
||||
|
|
Loading…
Reference in New Issue
Block a user