suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Change Performance Report popups to frames instead of dialogs.

Browse Source 
This fixes the lack of close button on mac.
This commit is contained in:
Vincent St-Amour 2012-01-06 15:59:23 -05:00
parent 076648fecc
commit 631c145add
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/typed-racket/optimizer/tool/display.rkt
View File

@ -15,7 +15,7 @@
(define ((popup-callback entry) ed start end) (define ((popup-callback entry) ed start end)
(match-define (report-entry subs start end badness) entry) (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])) [width popup-width] [height popup-height]))
(define pane (new text% [auto-wrap #t])) (define pane (new text% [auto-wrap #t]))
(define canvas (define canvas