summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorSteve Peters <steve@fisharerojo.org>2007-12-31 04:08:00 +0000
committerSteve Peters <steve@fisharerojo.org>2007-12-31 04:08:00 +0000
commit7a7524138a5c397ce82248e4a513d11be63af864 (patch)
tree67b5fab3e57662457e53c40e9c1e7bd19c55caea /lib
parentd020892c81d763c02d5422e917a01acc3c62a675 (diff)
downloadperl-7a7524138a5c397ce82248e4a513d11be63af864.tar.gz
Upgrade to AutoLoader-5.64
p4raw-id: //depot/perl@32787
Diffstat (limited to 'lib')
-rw-r--r--lib/AutoLoader.pm71
-rwxr-xr-xlib/AutoLoader/t/01AutoLoader.t (renamed from lib/AutoLoader.t)6
-rw-r--r--lib/AutoLoader/t/02AutoSplit.t (renamed from lib/AutoSplit.t)6
-rw-r--r--lib/AutoSplit.pm69
4 files changed, 145 insertions, 7 deletions
diff --git a/lib/AutoLoader.pm b/lib/AutoLoader.pm
index 28be69f878..215a9ff250 100644
--- a/lib/AutoLoader.pm
+++ b/lib/AutoLoader.pm
@@ -15,7 +15,7 @@ BEGIN {
$is_epoc = $^O eq 'epoc';
$is_vms = $^O eq 'VMS';
$is_macos = $^O eq 'MacOS';
- $VERSION = '5.63';
+ $VERSION = '5.64';
}
AUTOLOAD {
@@ -369,4 +369,73 @@ does C<chdir>.
L<SelfLoader> - an autoloader that doesn't use external files.
+=head1 AUTHOR
+
+C<AutoLoader> is maintained by the perl5-porters. Please direct
+any questions to the canonical mailing list. Anything that
+is applicable to the CPAN release can be sent to its maintainer,
+though.
+
+Author and Maintainer: The Perl5-Porters <perl5-porters@perl.org>
+
+Maintainer of the CPAN release: Steffen Mueller <smueller@cpan.org>
+
+=head1 COPYRIGHT AND LICENSE
+
+This package has been part of the perl core since the first release
+of perl5. It has been released separately to CPAN so older installations
+can benefit from bug fixes.
+
+This package has the same copyright and license as the perl core:
+
+ Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999,
+ 2000, 2001, 2002, 2003, 2004, 2005, 2006 by Larry Wall and others
+
+ All rights reserved.
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of either:
+
+ a) the GNU General Public License as published by the Free
+ Software Foundation; either version 1, or (at your option) any
+ later version, or
+
+ b) the "Artistic License" which comes with this Kit.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See either
+ the GNU General Public License or the Artistic License for more details.
+
+ You should have received a copy of the Artistic License with this
+ Kit, in the file named "Artistic". If not, I'll be glad to provide one.
+
+ You should also have received a copy of the GNU General Public License
+ along with this program in the file named "Copying". If not, write to the
+ Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+ 02111-1307, USA or visit their web page on the internet at
+ http://www.gnu.org/copyleft/gpl.html.
+
+ For those of you that choose to use the GNU General Public License,
+ my interpretation of the GNU General Public License is that no Perl
+ script falls under the terms of the GPL unless you explicitly put
+ said script under the terms of the GPL yourself. Furthermore, any
+ object code linked with perl does not automatically fall under the
+ terms of the GPL, provided such object code only adds definitions
+ of subroutines and variables, and does not otherwise impair the
+ resulting interpreter from executing any standard Perl script. I
+ consider linking in C subroutines in this manner to be the moral
+ equivalent of defining subroutines in the Perl language itself. You
+ may sell such an object file as proprietary provided that you provide
+ or offer to provide the Perl source, as specified by the GNU General
+ Public License. (This is merely an alternate way of specifying input
+ to the program.) You may also sell a binary produced by the dumping of
+ a running Perl script that belongs to you, provided that you provide or
+ offer to provide the Perl source as specified by the GPL. (The
+ fact that a Perl interpreter and your code are in the same binary file
+ is, in this case, a form of mere aggregation.) This is my interpretation
+ of the GPL. If you still have concerns or difficulties understanding
+ my intent, feel free to contact me. Of course, the Artistic License
+ spells all this out for your protection, so you may prefer to use that.
+
=cut
diff --git a/lib/AutoLoader.t b/lib/AutoLoader/t/01AutoLoader.t
index 92d66fa731..2b6ef9ae21 100755
--- a/lib/AutoLoader.t
+++ b/lib/AutoLoader/t/01AutoLoader.t
@@ -1,8 +1,10 @@
#!./perl -w
BEGIN {
+ if ($ENV{PERL_CORE}) {
chdir 't' if -d 't';
- @INC = '../lib';
+ @INC = '../lib';
+ }
}
use strict;
@@ -13,7 +15,7 @@ my $dir;
BEGIN
{
$dir = File::Spec->catdir( "auto-$$" );
- unshift @INC, $dir;
+ unshift @INC, $dir;
}
use Test::More tests => 22;
diff --git a/lib/AutoSplit.t b/lib/AutoLoader/t/02AutoSplit.t
index 36d33681d5..41ef6b85e1 100644
--- a/lib/AutoSplit.t
+++ b/lib/AutoLoader/t/02AutoSplit.t
@@ -1,5 +1,3 @@
-#!./perl -w
-
# AutoLoader.t runs before this test, so it seems safe to assume that it will
# work.
@@ -17,8 +15,8 @@ BEGIN {
$incdir = "auto-$$";
$lib = '"-I../lib"'; # ok on unix, nt, The extra \" are for VMS
}
- @INC = $incdir;
- push @INC, '../lib';
+ unshift @INC, $incdir;
+ unshift @INC, '../lib';
}
my $runperl = "$^X $lib";
diff --git a/lib/AutoSplit.pm b/lib/AutoSplit.pm
index a6c0ee32b2..a7da1acae3 100644
--- a/lib/AutoSplit.pm
+++ b/lib/AutoSplit.pm
@@ -128,6 +128,75 @@ either the I<__END__> marker or a "package Name;"-style specification.
C<AutoSplit> will also emit general diagnostics for inability to
create directories or files.
+=head1 AUTHOR
+
+C<AutoSplit> is maintained by the perl5-porters. Please direct
+any questions to the canonical mailing list. Anything that
+is applicable to the CPAN release can be sent to its maintainer,
+though.
+
+Author and Maintainer: The Perl5-Porters <perl5-porters@perl.org>
+
+Maintainer of the CPAN release: Steffen Mueller <smueller@cpan.org>
+
+=head1 COPYRIGHT AND LICENSE
+
+This package has been part of the perl core since the first release
+of perl5. It has been released separately to CPAN so older installations
+can benefit from bug fixes.
+
+This package has the same copyright and license as the perl core:
+
+ Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999,
+ 2000, 2001, 2002, 2003, 2004, 2005, 2006 by Larry Wall and others
+
+ All rights reserved.
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of either:
+
+ a) the GNU General Public License as published by the Free
+ Software Foundation; either version 1, or (at your option) any
+ later version, or
+
+ b) the "Artistic License" which comes with this Kit.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See either
+ the GNU General Public License or the Artistic License for more details.
+
+ You should have received a copy of the Artistic License with this
+ Kit, in the file named "Artistic". If not, I'll be glad to provide one.
+
+ You should also have received a copy of the GNU General Public License
+ along with this program in the file named "Copying". If not, write to the
+ Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+ 02111-1307, USA or visit their web page on the internet at
+ http://www.gnu.org/copyleft/gpl.html.
+
+ For those of you that choose to use the GNU General Public License,
+ my interpretation of the GNU General Public License is that no Perl
+ script falls under the terms of the GPL unless you explicitly put
+ said script under the terms of the GPL yourself. Furthermore, any
+ object code linked with perl does not automatically fall under the
+ terms of the GPL, provided such object code only adds definitions
+ of subroutines and variables, and does not otherwise impair the
+ resulting interpreter from executing any standard Perl script. I
+ consider linking in C subroutines in this manner to be the moral
+ equivalent of defining subroutines in the Perl language itself. You
+ may sell such an object file as proprietary provided that you provide
+ or offer to provide the Perl source, as specified by the GNU General
+ Public License. (This is merely an alternate way of specifying input
+ to the program.) You may also sell a binary produced by the dumping of
+ a running Perl script that belongs to you, provided that you provide or
+ offer to provide the Perl source as specified by the GPL. (The
+ fact that a Perl interpreter and your code are in the same binary file
+ is, in this case, a form of mere aggregation.) This is my interpretation
+ of the GPL. If you still have concerns or difficulties understanding
+ my intent, feel free to contact me. Of course, the Artistic License
+ spells all this out for your protection, so you may prefer to use that.
+
=cut
# for portability warn about names longer than $maxlen