From: Abhijit Menon-Sen Date: Mon, 5 May 2003 04:03:10 +0000 (+0000) Subject: None of that "our" stuff here, please. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d5f92636cfba103135e2664cae24bf7c4797b719;p=p5sagit%2Fp5-mst-13.2.git None of that "our" stuff here, please. p4raw-id: //depot/perl@19413 --- diff --git a/ext/Storable/t/tied.t b/ext/Storable/t/tied.t index 05bcf32..662d9ae 100644 --- a/ext/Storable/t/tied.t +++ b/ext/Storable/t/tied.t @@ -211,7 +211,7 @@ ok 22, $FAULT::fault == 2; { package P; use Storable qw(freeze thaw); - our ($a,$b); + use vars qw($a $b); $b = "not ok "; sub TIESCALAR { bless \$a } sub FETCH { "ok " } tie $a, P; my $r = thaw freeze \$a; $b = $$r;