summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Fl_mac.cxx7
1 files changed, 7 insertions, 0 deletions
diff --git a/src/Fl_mac.cxx b/src/Fl_mac.cxx
index ff619156c..00725fd6a 100644
--- a/src/Fl_mac.cxx
+++ b/src/Fl_mac.cxx
@@ -633,6 +633,13 @@ static double do_queued_events( double time = 0.0 )
if (!ReceiveNextEvent(0, NULL, timeout, true, &event)) {
got_events = 1;
OSErr ret = SendEventToEventTarget( event, target );
+ if (ret!=noErr) {
+ EventRecord clevent;
+ ConvertEventRefToEventRecord(event, &clevent);
+ if (clevent.what==kHighLevelEvent) {
+ ret = AEProcessAppleEvent(&clevent);
+ }
+ }
if ( ret==eventNotHandledErr
&& GetEventClass(event)==kEventClassMouse
&& GetEventKind(event)==kEventMouseDown ) {