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

fix problem related to cursor tracking

Browse Source
This commit is contained in:
Matthew Flatt 2010-08-24 09:12:28 -06:00
parent 4239aa2869
commit b3f1cc4b41
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
collects/mred/private/wx/gtk/frame.rkt
View File

@ -295,7 +295,8 @@
(define waiting-cursor? #f) (define waiting-cursor? #f)
(define/public (set-wait-cursor-mode on?) (define/public (set-wait-cursor-mode on?)
(set! waiting-cursor? on?) (set! waiting-cursor? on?)
(send in-window enter-window)) (when in-window
(send in-window enter-window)))
(define current-cursor-handle #f) (define current-cursor-handle #f)
(define in-window #f) (define in-window #f)
@ -314,7 +315,8 @@
(define/override (leave-window) (void)) (define/override (leave-window) (void))
(define/override (check-window-cursor win) (define/override (check-window-cursor win)
(send in-window enter-window)) (when in-window
(send in-window enter-window)))
(define maximized? #f) (define maximized? #f)