make sure there is a dc before trying to size text
This commit is contained in:
parent
d47bfc287d
commit
6c0baa0c1e
|
@ -507,7 +507,7 @@
|
|||
(define/private (in-lock/in-read-more? evt)
|
||||
(cond
|
||||
[(send evt leaving?) (values #f #f)]
|
||||
[(get-show-docs?)
|
||||
[(and (get-show-docs?) (get-dc))
|
||||
(define dc-x (send evt get-x))
|
||||
(define dc-y (send evt get-y))
|
||||
(define-values (br bt bmp-x bmp-y) (get-box-upper-right-and-lock-coordinates))
|
||||
|
|
Loading…
Reference in New Issue
Block a user