'parent' =>
{
'MAINTAINER' => 'corion',
- 'DISTRIBUTION' => 'CORION/parent-0.223.tar.gz',
+ 'DISTRIBUTION' => 'CORION/parent-0.224.tar.gz',
'FILES' => q[cpan/parent],
'UPSTREAM' => undef,
},
package parent;
use strict;
use vars qw($VERSION);
-$VERSION = '0.223';
+$VERSION = '0.224';
sub import {
my $class = shift;
{
no strict 'refs';
- # This is more efficient than push for the new MRO
- # at least until the new MRO is fixed
- @{"$inheritor\::ISA"} = (@{"$inheritor\::ISA"} , @_);
+ push @{"$inheritor\::ISA"}, @_;
};
};
__END__
+=encoding utf8
+
=head1 NAME
parent - Establish an ISA relationship with base classes at compile time
=head1 AUTHORS AND CONTRIBUTORS
-Rafaël Garcia-Suarez, Bart Lateur, Max Maischein, Anno Siegel, Michael Schwern
+Rafaël Garcia-Suarez, Bart Lateur, Max Maischein, Anno Siegel, Michael Schwern
=head1 MAINTAINER
Max Maischein C< corion@cpan.org >
-Copyright (c) 2007 Max Maischein C<< <corion@cpan.org> >>
+Copyright (c) 2007-10 Max Maischein C<< <corion@cpan.org> >>
Based on the idea of C<base.pm>, which was introduced with Perl 5.004_04.
=head1 LICENSE