X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F28-uvar.t;h=fcb531b8d7d691fc24e71dd70cc7dd1a9f36e4e9;hb=da95f9db8211008bbb415d2de11e3616daf4017e;hp=c4551ed6c941d74381eef3c675b7da85cef0bfb7;hpb=16e2df08bcfa1286759b63bb20dbd536acd1cb44;p=perl%2Fmodules%2FVariable-Magic.git diff --git a/t/28-uvar.t b/t/28-uvar.t index c4551ed..fcb531b 100644 --- a/t/28-uvar.t +++ b/t/28-uvar.t @@ -105,7 +105,7 @@ for my $i (1 .. 2) { for my $i (1 .. 2) { eval { $h3{b} = 5 + $i }; - is $@, "uvar: change readonly key in store doesn't croak ($i)"; + is $@, '', "uvar: change readonly key in store doesn't croak ($i)"; is_deeply \%h3, { a => 3, b => 5, c => 5 + $i }, "uvar: change readonly key in store correcty ($i)"; }