Fix used only once warning in gmagic.t.
authorCraig A. Berry <craigberry@mac.com>
Fri, 12 Oct 2018 19:26:09 +0000 (14:26 -0500)
committerCraig A. Berry <craigberry@mac.com>
Fri, 12 Oct 2018 19:37:18 +0000 (14:37 -0500)
t/op/gmagic.t

index 0ed5755..0c85955 100644 (file)
@@ -62,6 +62,7 @@ chomp $c;
 expected_tie_calls(tied $c, 1, 2, 'chomping a ref');
 
 {
+    no warnings 'once'; # main::foo
     my $outfile = tempfile();
     open my $h, ">$outfile" or die  "$0 cannot close $outfile: $!";
     binmode $h;