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

There's no check that frame isn't #f here, and this seems to be the root of

Browse Source 
the failure I was noticing whenever popup windows were triggered (e.g., hitting
the backtrace button or trying to submit a bug report).

svn: r18293
This commit is contained in:
Stevie Strickland 2010-02-23 10:24:09 +00:00
parent 2406ac6011
commit 1c31d939d4
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/drscheme/private/main.ss
View File

@ -564,7 +564,7 @@
(when frame (when frame
(send frame next-tab))))]) (send frame next-tab))))])
(let ([frame (find-frame windows-menu)]) (let ([frame (find-frame windows-menu)])
(unless (= 1 (send frame get-tab-count)) (unless (or (not frame) (= 1 (send frame get-tab-count)))
(for ([i (in-range 0 (send frame get-tab-count))] (for ([i (in-range 0 (send frame get-tab-count))]
#:when (< i 9)) #:when (< i 9))
(new menu-item% (new menu-item%