Change Performance Report popups to frames instead of dialogs.

This fixes the lack of close button on mac.
2012-01-06 15:59:23 -05:00 · 2012-01-06 15:59:23 -05:00 · 631c145add
commit 631c145add
parent 076648fecc
1 changed files with 1 additions and 1 deletions
--- 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