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

make sure there is a dc before trying to size text

Browse Source
This commit is contained in:
Robby Findler 2012-11-25 13:18:09 -06:00
parent d47bfc287d
commit 6c0baa0c1e
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/drracket/private/syncheck/blueboxes-gui.rkt
View File

@ -507,7 +507,7 @@
(define/private (in-lock/in-read-more? evt) (define/private (in-lock/in-read-more? evt)
(cond (cond
[(send evt leaving?) (values #f #f)] [(send evt leaving?) (values #f #f)]
[(get-show-docs?) [(and (get-show-docs?) (get-dc))
(define dc-x (send evt get-x)) (define dc-x (send evt get-x))
(define dc-y (send evt get-y)) (define dc-y (send evt get-y))
(define-values (br bt bmp-x bmp-y) (get-box-upper-right-and-lock-coordinates)) (define-values (br bt bmp-x bmp-y) (get-box-upper-right-and-lock-coordinates))