Change tie_fetch_count.t to use *] instead of **.
authorNicholas Clark <nick@ccl4.org>
Wed, 20 Mar 2013 13:26:56 +0000 (14:26 +0100)
committerNicholas Clark <nick@ccl4.org>
Thu, 21 Mar 2013 08:13:51 +0000 (09:13 +0100)
The test is not sensitive to which typeglob is used.

t/op/tie_fetch_count.t

index 240d23a..6b2eb79 100644 (file)
@@ -172,7 +172,7 @@ $dummy  = %$var3        ; check_count '%{}';
 $dummy  = keys $var3    ; check_count 'keys hashref';
 {
     no strict 'refs';
-    tie my $var4 => 'main', **;
+    tie my $var4 => 'main', *];
     $dummy  = *$var4        ; check_count '*{}';
 }