From: Nicholas Clark <nick@ccl4.org>
Date: Wed, 5 Jan 2005 10:10:14 +0000 (+0000)
Subject: Rafael spotted that my changes caused warnings. So clean up.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=adb2fcba926db68009c2341ac4b91b44e6f7b720;p=p5sagit%2Fp5-mst-13.2.git

Rafael spotted that my changes caused warnings. So clean up.

p4raw-id: //depot/perl@23747
---

diff --git a/t/op/attrs.t b/t/op/attrs.t
index cf4bb44..dc91438 100644
--- a/t/op/attrs.t
+++ b/t/op/attrs.t
@@ -154,6 +154,7 @@ $valid{CODE} = {map {$_ => 1} @code};
 $valid{SCALAR} = {map {$_ => 1} @other};
 $valid{ARRAY} = $valid{HASH} = $valid{SCALAR};
 
+our ($scalar, @array, %hash);
 foreach my $value (\&foo, \$scalar, \@array, \%hash) {
     my $type = ref $value;
     foreach my $negate ('', '-') {