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

Fixed bug that caused an internal error when opening a new drscheme window

Browse Source 
svn: r9360
This commit is contained in:
Kathy Gray 2008-04-18 12:21:51 +00:00
parent 3730930380
commit a9ad2600c1
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/test-engine/test-tool.scm
View File

@ -191,7 +191,8 @@
[else (send (car m) restore) (r-loop (cdr m))]))))]
[else (send testing-menu delete)])))
(drscheme:language:register-capability 'tests:test-menu (flat-contract boolean?) #f)
(unless (drscheme:language:capability-registered? 'tests:test-menu)
(drscheme:language:register-capability 'tests:test-menu (flat-contract boolean?) #f))
(super-instantiate ())
))