X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F55-yield-target.t;h=46ea7f5d51e44287355cb7d3aea7dd0c290e5a60;hb=9f4e270a50090f065bbeebbcac06fd6b4297e45c;hp=48b503626157e7eecc080ff2b6b5b33c61adb80b;hpb=be1d59463692da1b5ef787aeffd0aedbef65664e;p=perl%2Fmodules%2FScope-Upper.git

diff --git a/t/55-yield-target.t b/t/55-yield-target.t
index 48b5036..46ea7f5 100644
--- a/t/55-yield-target.t
+++ b/t/55-yield-target.t
@@ -72,7 +72,7 @@ is_deeply \@res, [ 20, 23 ], 'yield() in while () { ... }';
  my $err  = $@;
  my $line = __LINE__-3;
  like $err,
-      qr/^yield\(\) cannot target a substitution context at \Q$0\E line $line/,
+      qr/^yield\(\) can't target a substitution context at \Q$0\E line $line/,
       'yield() cannot exit subst';
 }