diff --git a/gui-lib/mred/private/wx/cocoa/frame.rkt b/gui-lib/mred/private/wx/cocoa/frame.rkt
index 41bb9f3f..31f7c5f1 100644
--- a/gui-lib/mred/private/wx/cocoa/frame.rkt
+++ b/gui-lib/mred/private/wx/cocoa/frame.rkt
@@ -429,7 +429,8 @@
       (when (zero? flush-disabled)
         (tellv cocoa enableFlushWindow)
         (when (version-10.11-or-later?)
-          (tellv cocoa setAutodisplay: #:type _BOOL #t))))
+          (tellv cocoa setAutodisplay: #:type _BOOL #t)
+          (tellv cocoa displayIfNeeded))))
 
     (define/public (force-window-focus)
       (let ([next (get-app-front-window)])