In t/22-len.t, localize the wizard for strings to the SKIP block

diff --git a/t/22-len.t b/t/22-len.t
index a35375fb21a1dcbcae9775d82b0273a34707dc03..d4f59d15fd9cad882626e783b5fa0d9d1001b689 100644 (file)
--- a/t/22-len.t
+++ b/t/22-len.t
@@ -70,8 +70,8 @@ SKIP: {
  $c = 0;
  $n = 1 + int rand 1000;
  # length magic on scalars needs also get magic to be triggered.
- $wiz = wizard get => sub { return 'anything' },
-               len => sub { $d = $_[2]; ++$c; return $n };
+ my $wiz = wizard get => sub { return 'anything' },
+                  len => sub { $d = $_[2]; ++$c; return $n };
 
  my $x = 6789;