Forgot one place

original commit: 28dce6996a5c2eb8cd8489bf5e6b4da7f280fcd1
This commit is contained in:
Jay McCarthy 2010-05-26 13:18:02 -06:00
parent 5fe728a687
commit 415bf97ff1

View File

@ -25,9 +25,9 @@
;; check-ready : -> void
(define/private (check-ready)
(unless view
(error 'racunit "The RackUnit GUI is no longer running."))
(error 'rackunit "The RackUnit GUI is no longer running."))
(when (get-locked?)
(error 'racunit "The RackUnit GUI is locked and not accepting tests.")))
(error 'rackunit "The RackUnit GUI is locked and not accepting tests.")))
;; create-model : test suite<%>/#f -> result<%>
(define/public (create-model test parent)