made the drracket test suite match the new labels in the language dialog.

This commit is contained in:
Robby Findler 2010-06-18 17:38:54 -05:00
parent ef43830265
commit 4cd7152b62

View File

@ -386,7 +386,7 @@
(let ([drs-frame (get-top-level-focus-window)])
(fw:test:menu-select "Language" "Choose Language...")
(let* ([language-dialog (wait-for-new-frame drs-frame)])
(fw:test:set-radio-box-item! "Use the language declared in the source")
(fw:test:set-radio-box-item! #rx"Use the language declared in the source")
(with-handlers ([exn:fail? (lambda (x) (void))])
(fw:test:button-push "Show Details"))