Forgot one place

This commit is contained in:
Jay McCarthy 2010-05-26 13:18:02 -06:00
parent c3d07af8d3
commit 28dce6996a

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)