This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
XS::APItest: s/justinc/justisa/
authorFather Chrysostomos <sprout@cpan.org>
Tue, 11 Oct 2011 06:51:53 +0000 (23:51 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Tue, 11 Oct 2011 06:52:35 +0000 (23:52 -0700)
I meant to call this mro ‘just @ISA’, because it just uses @ISA and
no super-superclasses.  But I misnamed it.  It has nothing to do
with @INC.

ext/XS-APItest/APItest.xs
ext/XS-APItest/t/mro.t

index 27c587a..ff2b9bb 100644 (file)
@@ -1156,7 +1156,7 @@ BOOT:
     newXS("XS::APItest::XSUB::XS_VERSION_empty", XS_XS__APItest__XSUB_XS_VERSION_empty, __FILE__);
     newXS("XS::APItest::XSUB::XS_APIVERSION_invalid", XS_XS__APItest__XSUB_XS_APIVERSION_invalid, __FILE__);
     mymro.resolve = myget_linear_isa;
-    mymro.name    = "justinc";
+    mymro.name    = "justisa";
     mymro.length  = 7;
     mymro.kflags  = 0;
     mymro.hash    = 0;
index 42dd661..3385913 100644 (file)
@@ -6,7 +6,7 @@ use Test::More;
 plan tests => 1;
 
 use mro;
-mro::set_mro(AA => 'justinc');
+mro::set_mro(AA => 'justisa');
 
 @AA::ISA = qw "BB CC";