cocoa: fix problem with frame focus
This commit is contained in:
parent
2f4c782434
commit
370c97165a
|
@ -271,6 +271,7 @@
|
|||
(for/or ([i (in-range (tell #:type _NSUInteger wins count))])
|
||||
(let ([win (tell wins objectAtIndex: #:type _NSUInteger i)])
|
||||
(and (tell #:type _BOOL win isVisible)
|
||||
(not (tell win parentWindow))
|
||||
(or (not root-fake-frame)
|
||||
(not (ptr-equal? win (send root-fake-frame get-cocoa))))
|
||||
win)))))))])
|
||||
|
|
Loading…
Reference in New Issue
Block a user