From 6e7c6f2f45d0b4379fa9237907bd9a397c9d3989 Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Sat, 25 May 2013 21:21:56 -0500
Subject: [PATCH] when the package installer has a parent, don't recenter the
 dialog

(should this be mac os x specific?)
---
 collects/pkg/gui/main.rkt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/pkg/gui/main.rkt b/collects/pkg/gui/main.rkt
index 5185172fd0..2183f42107 100644
--- a/collects/pkg/gui/main.rkt
+++ b/collects/pkg/gui/main.rkt
@@ -64,7 +64,7 @@
                #:close-button? #f
                (λ (cust parent) (wrap-terminal-action thunk))))
     (send dlg reflow-container)
-    (unless terminal (send dlg center))
+    (unless parent (unless terminal (send dlg center)))
     (set! terminal t)
     (disallow-close)
     (send dlg end-container-sequence)