From: Vincent Pit Date: Mon, 12 Jan 2009 16:12:56 +0000 (+0100) Subject: Correct test description X-Git-Tag: v0.05~4 X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=be1c9e0f31c1d07c4a8e934f36dca3077cc5ca46;p=perl%2Fmodules%2FScope-Upper.git Correct test description --- diff --git a/t/50-unwind-target.t b/t/50-unwind-target.t index 35ca97e..7e43baa 100644 --- a/t/50-unwind-target.t +++ b/t/50-unwind-target.t @@ -25,5 +25,5 @@ is_deeply \@res, [ 7 ], 'unwind(-1)'; unwind 100; 8; }); -like $@, qr/^Can't\s+return\s+outside\s+a\s+subroutine/, 'unwind(100)'; +like $@, qr/^Can't\s+return\s+outside\s+a\s+subroutine/, 'unwind(100) croaks'; is_deeply \@res, [ 7 ], 'unwind(100)';