diff options
| author | Rick Delaney <rick@consumercontact.com> | 2007-09-06 10:40:39 -0400 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-09-10 09:43:14 +0000 |
| commit | 934dcd01a67d880a33ac86f3f36dcf355d6f8f7a (patch) | |
| tree | 716aa31407bc260602c7c1d818114a4a5dfc03f6 /t/mro | |
| parent | fef074f7c29876fb6c02244b464e092f2047abda (diff) | |
| download | perl-934dcd01a67d880a33ac86f3f36dcf355d6f8f7a.tar.gz | |
Re: [perl #44623] Optimized magic_setisa has bug
Message-ID: <20070906184039.GG9260@bort.ca>
p4raw-id: //depot/perl@31838
Diffstat (limited to 't/mro')
| -rw-r--r-- | t/mro/basic.t | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/t/mro/basic.t b/t/mro/basic.t index f23fabed00..695306cf61 100644 --- a/t/mro/basic.t +++ b/t/mro/basic.t @@ -160,10 +160,7 @@ is(eval { MRO_N->testfunc() }, 123); ok(eq_array(mro::get_linear_isa('ISACLEAR2'),[qw/ISACLEAR2 YY ZZ/])); (@ISACLEAR1::ISA, @ISACLEAR2::ISA) = (); - { - local our $TODO = 1; - ok(eq_array(mro::get_linear_isa('ISACLEAR1'),[qw/ISACLEAR1/])); - } + ok(eq_array(mro::get_linear_isa('ISACLEAR1'),[qw/ISACLEAR1/])); ok(eq_array(mro::get_linear_isa('ISACLEAR2'),[qw/ISACLEAR2/])); } |