--- Coro/t/07_eval.t 2001/08/14 14:56:22 1.1 +++ Coro/t/07_eval.t 2006/11/25 00:40:26 1.3 @@ -14,10 +14,12 @@ my $t = eval "3"; print "ok $t\n"; cede; - print defined eval "require Coro::Nonexistent" ? "not ok" : "ok", " 5\n"; + print defined eval "die" ? "not ok" : "ok", " 5\n"; }; print "ok 1\n"; cede; cede; +cede; +cede;