Test L:{last L} in t/18-opinfo.t

[perl/modules/Variable-Magic.git] / t / 28-uvar.t

diff --git a/t/28-uvar.t b/t/28-uvar.t
index 8601a9c1daa8881e93acfa99aecea8440043972b..fcb531b8d7d691fc24e71dd70cc7dd1a9f36e4e9 100644 (file)
--- 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 croaks ($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)";
+                        "uvar: change readonly key in store correcty ($i)";
 }