r611 - in packages/libclass-default-perl/branches/upstream/current: . inc/Module inc/Module/Install lib/Class
Allard Hoeve
hoeve-guest@costa.debian.org
Tue, 11 Jan 2005 09:45:24 +0100
Author: hoeve-guest
Date: 2005-01-11 09:45:23 +0100 (Tue, 11 Jan 2005)
New Revision: 611
Modified:
packages/libclass-default-perl/branches/upstream/current/Changes
packages/libclass-default-perl/branches/upstream/current/META.yml
packages/libclass-default-perl/branches/upstream/current/inc/Module/Install.pm
packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/AutoInstall.pm
packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Base.pm
packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Build.pm
packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Can.pm
packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Fetch.pm
packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Makefile.pm
packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Metadata.pm
packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Win32.pm
packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/WriteAll.pm
packages/libclass-default-perl/branches/upstream/current/lib/Class/Default.pm
Log:
Load /tmp/tmp.x1vNpX/libclass-default-perl-1.2 into
packages/libclass-default-perl/branches/upstream/current.
Modified: packages/libclass-default-perl/branches/upstream/current/Changes
===================================================================
--- packages/libclass-default-perl/branches/upstream/current/Changes 2005-01-10 19:28:38 UTC (rev 610)
+++ packages/libclass-default-perl/branches/upstream/current/Changes 2005-01-11 08:45:23 UTC (rev 611)
@@ -1,5 +1,16 @@
Revision history for Perl extension Class::Default.
+1.2 Tue Jan 11 2005
+ - There are no functional changes in this release
+ - Resolved CPAN #9581 Missing changes for 1.1
+ - See rt.cpan bug page for why I released to fix this if needed.
+
+1.1 Sat Oct 2 2004
+ - There are no functional changes in this release
+ - Upgraded Makefile.PL to Module::Build
+ - Modernised the test scripts
+ - Call Carp::croak explicitly
+
1.0 Mon Dec 15 2003
- Minor code cleanup to slightly reduce memory overhead
- Incrementing to version 1.0
Modified: packages/libclass-default-perl/branches/upstream/current/META.yml
===================================================================
--- packages/libclass-default-perl/branches/upstream/current/META.yml 2005-01-10 19:28:38 UTC (rev 610)
+++ packages/libclass-default-perl/branches/upstream/current/META.yml 2005-01-11 08:45:23 UTC (rev 611)
@@ -1,5 +1,5 @@
name: Class-Default
-version: 1.1
+version: 1.2
abstract: Static methods apply to a default instantiation
author: Adam Kennedy<cpan@ali.as>
license: perl
@@ -12,4 +12,4 @@
no_index:
directory:
- inc
-generated_by: Module::Install version 0.35
+generated_by: Module::Install version 0.36
Modified: packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/AutoInstall.pm
===================================================================
--- packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/AutoInstall.pm 2005-01-10 19:28:38 UTC (rev 610)
+++ packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/AutoInstall.pm 2005-01-11 08:45:23 UTC (rev 611)
@@ -1,7 +1,4 @@
-#line 1 "inc/Module/Install/AutoInstall.pm - /usr/lib/perl5/site_perl/5.8.0/Module/Install/AutoInstall.pm"
-# $File: //depot/cpan/Module-Install/lib/Module/Install/AutoInstall.pm $ $Author: autrijus $
-# $Revision: #13 $ $Change: 1846 $ $DateTime: 2003/12/31 22:57:12 $ vim: expandtab shiftwidth=4
-
+#line 1 "inc/Module/Install/AutoInstall.pm - /usr/local/share/perl/5.8.4/Module/Install/AutoInstall.pm"
package Module::Install::AutoInstall;
use Module::Install::Base; @ISA = qw(Module::Install::Base);
Modified: packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Base.pm
===================================================================
--- packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Base.pm 2005-01-10 19:28:38 UTC (rev 610)
+++ packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Base.pm 2005-01-11 08:45:23 UTC (rev 611)
@@ -1,10 +1,7 @@
-#line 1 "inc/Module/Install/Base.pm - /usr/lib/perl5/site_perl/5.8.0/Module/Install/Base.pm"
-# $File: //depot/cpan/Module-Install/lib/Module/Install/Base.pm $ $Author: autrijus $
-# $Revision: #10 $ $Change: 1847 $ $DateTime: 2003/12/31 23:14:54 $ vim: expandtab shiftwidth=4
-
+#line 1 "inc/Module/Install/Base.pm - /usr/local/share/perl/5.8.4/Module/Install/Base.pm"
package Module::Install::Base;
-#line 31
+#line 28
sub new {
my ($class, %args) = @_;
@@ -18,18 +15,18 @@
bless(\%args, $class);
}
-#line 49
+#line 46
sub AUTOLOAD {
my $self = shift;
goto &{$self->_top->autoload};
}
-#line 60
+#line 57
sub _top { $_[0]->{_top} }
-#line 71
+#line 68
sub admin {
my $self = shift;
@@ -54,4 +51,4 @@
__END__
-#line 115
+#line 112
Modified: packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Build.pm
===================================================================
--- packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Build.pm 2005-01-10 19:28:38 UTC (rev 610)
+++ packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Build.pm 2005-01-11 08:45:23 UTC (rev 611)
@@ -1,7 +1,4 @@
-#line 1 "inc/Module/Install/Build.pm - /usr/lib/perl5/site_perl/5.8.0/Module/Install/Build.pm"
-# $File: //depot/cpan/Module-Install/lib/Module/Install/Build.pm $ $Author: ingy $
-# $Revision: #23 $ $Change: 1255 $ $DateTime: 2003/03/05 13:23:32 $ vim: expandtab shiftwidth=4
-
+#line 1 "inc/Module/Install/Build.pm - /usr/local/share/perl/5.8.4/Module/Install/Build.pm"
package Module::Install::Build;
$VERSION = '0.01';
use strict;
@@ -63,4 +60,4 @@
__END__
-#line 178
+#line 175
Modified: packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Can.pm
===================================================================
--- packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Can.pm 2005-01-10 19:28:38 UTC (rev 610)
+++ packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Can.pm 2005-01-11 08:45:23 UTC (rev 611)
@@ -1,7 +1,4 @@
-#line 1 "inc/Module/Install/Can.pm - /usr/lib/perl5/site_perl/5.8.0/Module/Install/Can.pm"
-# $File: //depot/cpan/Module-Install/lib/Module/Install/Can.pm $ $Author: autrijus $
-# $Revision: #6 $ $Change: 1840 $ $DateTime: 2003/12/28 19:42:02 $ vim: expandtab shiftwidth=4
-
+#line 1 "inc/Module/Install/Can.pm - /usr/local/share/perl/5.8.4/Module/Install/Can.pm"
package Module::Install::Can;
use Module::Install::Base; @ISA = qw(Module::Install::Base);
$VERSION = '0.01';
Modified: packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Fetch.pm
===================================================================
--- packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Fetch.pm 2005-01-10 19:28:38 UTC (rev 610)
+++ packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Fetch.pm 2005-01-11 08:45:23 UTC (rev 611)
@@ -1,7 +1,4 @@
-#line 1 "inc/Module/Install/Fetch.pm - /usr/lib/perl5/site_perl/5.8.0/Module/Install/Fetch.pm"
-# $File: //depot/cpan/Module-Install/lib/Module/Install/Fetch.pm $ $Author: autrijus $
-# $Revision: #8 $ $Change: 1374 $ $DateTime: 2003/03/18 11:50:15 $ vim: expandtab shiftwidth=4
-
+#line 1 "inc/Module/Install/Fetch.pm - /usr/local/share/perl/5.8.4/Module/Install/Fetch.pm"
package Module::Install::Fetch;
use Module::Install::Base; @ISA = qw(Module::Install::Base);
Modified: packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Makefile.pm
===================================================================
--- packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Makefile.pm 2005-01-10 19:28:38 UTC (rev 610)
+++ packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Makefile.pm 2005-01-11 08:45:23 UTC (rev 611)
@@ -1,7 +1,4 @@
-#line 1 "inc/Module/Install/Makefile.pm - /usr/lib/perl5/site_perl/5.8.0/Module/Install/Makefile.pm"
-# $File: //depot/cpan/Module-Install/lib/Module/Install/Makefile.pm $ $Author: autrijus $
-# $Revision: #53 $ $Change: 1847 $ $DateTime: 2003/12/31 23:14:54 $ vim: expandtab shiftwidth=4
-
+#line 1 "inc/Module/Install/Makefile.pm - /usr/local/share/perl/5.8.4/Module/Install/Makefile.pm"
package Module::Install::Makefile;
use Module::Install::Base; @ISA = qw(Module::Install::Base);
@@ -143,4 +140,4 @@
__END__
-#line 276
+#line 273
Modified: packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Metadata.pm
===================================================================
--- packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Metadata.pm 2005-01-10 19:28:38 UTC (rev 610)
+++ packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Metadata.pm 2005-01-11 08:45:23 UTC (rev 611)
@@ -1,7 +1,4 @@
-#line 1 "inc/Module/Install/Metadata.pm - /usr/lib/perl5/site_perl/5.8.0/Module/Install/Metadata.pm"
-# $File: //depot/cpan/Module-Install/lib/Module/Install/Metadata.pm $ $Author: autrijus $
-# $Revision: #32 $ $Change: 1885 $ $DateTime: 2004/03/11 05:55:27 $ vim: expandtab shiftwidth=4
-
+#line 1 "inc/Module/Install/Metadata.pm - /usr/local/share/perl/5.8.4/Module/Install/Metadata.pm"
package Module::Install::Metadata;
use Module::Install::Base; @ISA = qw(Module::Install::Base);
Modified: packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Win32.pm
===================================================================
--- packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Win32.pm 2005-01-10 19:28:38 UTC (rev 610)
+++ packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/Win32.pm 2005-01-11 08:45:23 UTC (rev 611)
@@ -1,7 +1,4 @@
-#line 1 "inc/Module/Install/Win32.pm - /usr/lib/perl5/site_perl/5.8.0/Module/Install/Win32.pm"
-# $File: //depot/cpan/Module-Install/lib/Module/Install/Win32.pm $ $Author: autrijus $
-# $Revision: #9 $ $Change: 1789 $ $DateTime: 2003/11/11 01:22:54 $ vim: expandtab shiftwidth=4
-
+#line 1 "inc/Module/Install/Win32.pm - /usr/local/share/perl/5.8.4/Module/Install/Win32.pm"
package Module::Install::Win32;
use Module::Install::Base; @ISA = qw(Module::Install::Base);
Modified: packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/WriteAll.pm
===================================================================
--- packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/WriteAll.pm 2005-01-10 19:28:38 UTC (rev 610)
+++ packages/libclass-default-perl/branches/upstream/current/inc/Module/Install/WriteAll.pm 2005-01-11 08:45:23 UTC (rev 611)
@@ -1,7 +1,4 @@
-#line 1 "inc/Module/Install/WriteAll.pm - /usr/lib/perl5/site_perl/5.8.0/Module/Install/WriteAll.pm"
-# $File: //depot/cpan/Module-Install/lib/Module/Install/WriteAll.pm $ $Author: autrijus $
-# $Revision: #3 $ $Change: 1885 $ $DateTime: 2004/03/11 05:55:27 $ vim: expandtab shiftwidth=4
-
+#line 1 "inc/Module/Install/WriteAll.pm - /usr/local/share/perl/5.8.4/Module/Install/WriteAll.pm"
package Module::Install::WriteAll;
use Module::Install::Base; @ISA = qw(Module::Install::Base);
Modified: packages/libclass-default-perl/branches/upstream/current/inc/Module/Install.pm
===================================================================
--- packages/libclass-default-perl/branches/upstream/current/inc/Module/Install.pm 2005-01-10 19:28:38 UTC (rev 610)
+++ packages/libclass-default-perl/branches/upstream/current/inc/Module/Install.pm 2005-01-11 08:45:23 UTC (rev 611)
@@ -1,9 +1,6 @@
-#line 1 "inc/Module/Install.pm - /usr/lib/perl5/site_perl/5.8.0/Module/Install.pm"
-# $File: //depot/cpan/Module-Install/lib/Module/Install.pm $ $Author: autrijus $
-# $Revision: #69 $ $Change: 2301 $ $DateTime: 2004/07/13 07:16:40 $ vim: expandtab shiftwidth=4
-
+#line 1 "inc/Module/Install.pm - /usr/local/share/perl/5.8.4/Module/Install.pm"
package Module::Install;
-$VERSION = '0.35';
+$VERSION = '0.36';
die << "." unless $INC{join('/', inc => split(/::/, __PACKAGE__)).'.pm'};
Please invoke ${\__PACKAGE__} with:
@@ -24,7 +21,7 @@
@inc::Module::Install::ISA = 'Module::Install';
*inc::Module::Install::VERSION = *VERSION;
-#line 132
+#line 129
sub import {
my $class = shift;
@@ -47,7 +44,7 @@
delete $INC{"$self->{path}.pm"};
}
-#line 159
+#line 156
sub autoload {
my $self = shift;
@@ -67,7 +64,7 @@
};
}
-#line 184
+#line 181
sub new {
my ($class, %args) = @_;
@@ -92,7 +89,7 @@
bless(\%args, $class);
}
-#line 213
+#line 210
sub call {
my $self = shift;
@@ -103,7 +100,7 @@
goto &{$obj->can($method)};
}
-#line 228
+#line 225
sub load {
my ($self, $method) = @_;
@@ -127,7 +124,7 @@
$obj;
}
-#line 258
+#line 255
sub load_extensions {
my ($self, $path, $top_obj) = @_;
@@ -146,7 +143,7 @@
}
}
-#line 282
+#line 279
sub find_extensions {
my ($self, $path) = @_;
@@ -169,4 +166,4 @@
__END__
-#line 620
+#line 617
Modified: packages/libclass-default-perl/branches/upstream/current/lib/Class/Default.pm
===================================================================
--- packages/libclass-default-perl/branches/upstream/current/lib/Class/Default.pm 2005-01-10 19:28:38 UTC (rev 610)
+++ packages/libclass-default-perl/branches/upstream/current/lib/Class/Default.pm 2005-01-11 08:45:23 UTC (rev 611)
@@ -12,8 +12,8 @@
# Define globals
use vars qw{$VERSION %DEFAULT};
BEGIN {
- $VERSION = '1.1';
-
+ $VERSION = '1.2';
+
# Create the default object storage.
%DEFAULT = ();
}
@@ -34,7 +34,7 @@
# the cache, or create it new.
sub _get_default {
my $class = shift;
- $DEFAULT{$class}
+ $DEFAULT{$class}
|| ($DEFAULT{$class} = $class->_create_default_object)
|| Carp::croak "Error while creating default object";
}