From b0409dd23271e2cab0c340250c66852ed14f0293 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Wed, 16 May 2012 08:00:50 -0600 Subject: [PATCH] racket/gui cocoa: fix floating-window event handling Closes PR 12754 --- collects/mred/private/wx/cocoa/frame.rkt | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/collects/mred/private/wx/cocoa/frame.rkt b/collects/mred/private/wx/cocoa/frame.rkt index 24692717b2..84fec8a9f5 100644 --- a/collects/mred/private/wx/cocoa/frame.rkt +++ b/collects/mred/private/wx/cocoa/frame.rkt @@ -173,7 +173,8 @@ ;; eventspace: (not (ptr-equal? w (send root-fake-frame get-cocoa))) (is-mouse-or-key?)) - (objc-is-a? w MyWindow) + (or (objc-is-a? w MyWindow) + (objc-is-a? w MyPanel)) (tell #:type _scheme w getEventspace))] [front (send front get-eventspace)] [root-fake-frame