diff --git a/collects/framework/private/handler.ss b/collects/framework/private/handler.ss
index b876f44691..93f5b81174 100644
--- a/collects/framework/private/handler.ss
+++ b/collects/framework/private/handler.ss
@@ -380,7 +380,8 @@
 
       (define open-file
 	(λ ()
-	  (let* ([parent (and ; (preferences:get 'framework:open-here?)
+	  (let* ([parent (and (or (not (eq? 'macosx (system-type)))
+                                  (preferences:get 'framework:open-here?))
                               (get-top-level-focus-window))]
                  [file 
                   (parameterize ([finder:dialog-parent-parameter parent])