From 631c145add9ac99ad66705e14c8c55dd8ce92f76 Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Fri, 6 Jan 2012 15:59:23 -0500 Subject: [PATCH] Change Performance Report popups to frames instead of dialogs. This fixes the lack of close button on mac. --- collects/typed-racket/optimizer/tool/display.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/typed-racket/optimizer/tool/display.rkt b/collects/typed-racket/optimizer/tool/display.rkt index f63f387070..4d485b34bc 100644 --- a/collects/typed-racket/optimizer/tool/display.rkt +++ b/collects/typed-racket/optimizer/tool/display.rkt @@ -15,7 +15,7 @@ (define ((popup-callback entry) ed start end) (match-define (report-entry subs start end badness) entry) - (define win (new dialog% [label "Performance Report"] + (define win (new frame% [label "Performance Report"] [width popup-width] [height popup-height])) (define pane (new text% [auto-wrap #t])) (define canvas