Hello community,
here is the log from the commit of package perl-Class-Autouse for openSUSE:Factory checked in at 2012-02-16 12:25:15
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Class-Autouse (Old)
and /work/SRC/openSUSE:Factory/.perl-Class-Autouse.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Class-Autouse", Maintainer is "VCizek@suse.com"
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Class-Autouse/perl-Class-Autouse.changes 2011-11-21 12:37:14.000000000 +0100
+++ /work/SRC/openSUSE:Factory/.perl-Class-Autouse.new/perl-Class-Autouse.changes 2012-02-16 12:25:27.000000000 +0100
@@ -1,0 +2,6 @@
+Mon Feb 6 10:07:21 UTC 2012 - vcizek@suse.com
+
+- update to 2.01
+ - Removing the use of "defined @array" deprecated in 5.16
+
+-------------------------------------------------------------------
Old:
----
Class-Autouse-2.00.tar.gz
New:
----
Class-Autouse-2.01.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Class-Autouse.spec ++++++
--- /var/tmp/diff_new_pack.jPrh3M/_old 2012-02-16 12:25:28.000000000 +0100
+++ /var/tmp/diff_new_pack.jPrh3M/_new 2012-02-16 12:25:28.000000000 +0100
@@ -1,7 +1,7 @@
#
# spec file for package perl-Class-Autouse
#
-# Copyright (c) 2011 SUSE LINUX Products GmbH, Nuernberg, Germany.
+# Copyright (c) 2012 SUSE LINUX Products GmbH, Nuernberg, Germany.
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -15,20 +15,18 @@
# Please submit bugfixes or comments via http://bugs.opensuse.org/
#
-# norootforbuild
Name: perl-Class-Autouse
-BuildRequires: perl-Carp-Assert
-BuildRequires: perl-macros
-Version: 2.00
+Version: 2.01
Release: 1
-Summary: Run-time class loading on first method call
-Group: Development/Libraries/Perl
License: Artistic-1.0 ; GPL-2.0+
-AutoReqProv: on
+Summary: Run-time class loading on first method call
Url: http://cpan.org/modules/by-module/Class/
+Group: Development/Libraries/Perl
Source: Class-Autouse-%{version}.tar.gz
+BuildRequires: perl-Carp-Assert
+BuildRequires: perl-macros
BuildRoot: %{_tmppath}/%{name}-%{version}-build
%{perl_requires}
@@ -38,12 +36,6 @@
used during the running of a program, such as Date::Manip, this can
save you large amounts of memory, and decrease the script load time.
-
-
-Authors:
---------
- Adam Kennedy
-
%prep
%setup -q -n Class-Autouse-%{version}
@@ -55,11 +47,11 @@
make test
%install
-make DESTDIR=$RPM_BUILD_ROOT install_vendor
+make DESTDIR=%{buildroot} install_vendor
%perl_process_packlist
%clean
-rm -rf $RPM_BUILD_ROOT
+rm -rf %{buildroot}
%files
%defattr(-,root,root)
++++++ Class-Autouse-2.00.tar.gz -> Class-Autouse-2.01.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/Changes new/Class-Autouse-2.01/Changes
--- old/Class-Autouse-2.00/Changes 2011-01-18 01:02:20.000000000 +0100
+++ new/Class-Autouse-2.01/Changes 2012-02-03 08:55:57.000000000 +0100
@@ -1,5 +1,8 @@
Revision history for Perl extension Class-Autouse
+2.01 Fri 3 Feb 2012
+ - Removing the use of "defined @array" deprecated in 5.16
+
2.00 Tue 18 Jan 2011
- Switching to a production release
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/MANIFEST new/Class-Autouse-2.01/MANIFEST
--- old/Class-Autouse-2.00/MANIFEST 2011-01-18 01:03:20.000000000 +0100
+++ new/Class-Autouse-2.01/MANIFEST 2012-02-03 08:56:56.000000000 +0100
@@ -14,6 +14,7 @@
Makefile.PL
MANIFEST This list of files
META.yml
+MYMETA.json
README
t/01_compile.t
t/02_main.t
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/META.yml new/Class-Autouse-2.01/META.yml
--- old/Class-Autouse-2.00/META.yml 2011-01-18 01:03:20.000000000 +0100
+++ new/Class-Autouse-2.01/META.yml 2012-02-03 08:56:56.000000000 +0100
@@ -3,13 +3,14 @@
author:
- 'Adam Kennedy '
build_requires:
- ExtUtils::MakeMaker: 6.42
+ ExtUtils::MakeMaker: 6.62
File::Temp: 0.17
Test::More: 0.47
configure_requires:
- ExtUtils::MakeMaker: 6.42
+ ExtUtils::MakeMaker: 6.62
distribution_type: module
-generated_by: 'Module::Install version 1.00'
+dynamic_config: 0
+generated_by: 'Module::Install version 1.04'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -23,10 +24,10 @@
- xt
requires:
File::Spec: 0.80
- List::Util: 1.19
+ List::Util: 1.18
perl: 5.6.0
resources:
ChangeLog: http://fisheye2.atlassian.com/changelog/cpan/trunk/Class-Autouse
license: http://dev.perl.org/licenses/
repository: http://svn.ali.as/cpan/trunk/Class-Autouse
-version: 2.00
+version: 2.01
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/MYMETA.json new/Class-Autouse-2.01/MYMETA.json
--- old/Class-Autouse-2.00/MYMETA.json 1970-01-01 01:00:00.000000000 +0100
+++ new/Class-Autouse-2.01/MYMETA.json 2012-02-03 08:56:56.000000000 +0100
@@ -0,0 +1,56 @@
+{
+ "abstract" : "Run-time load a class the first time you call a method in it.",
+ "author" : [
+ "Adam Kennedy "
+ ],
+ "dynamic_config" : 0,
+ "generated_by" : "Module::Install version 1.04, CPAN::Meta::Converter version 2.112621",
+ "license" : [
+ "perl_5"
+ ],
+ "meta-spec" : {
+ "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec",
+ "version" : "2"
+ },
+ "name" : "Class-Autouse",
+ "no_index" : {
+ "directory" : [
+ "inc",
+ "t",
+ "xt"
+ ]
+ },
+ "prereqs" : {
+ "build" : {
+ "requires" : {
+ "ExtUtils::MakeMaker" : "6.62",
+ "File::Temp" : "0.17",
+ "Test::More" : "0.47"
+ }
+ },
+ "configure" : {
+ "requires" : {
+ "ExtUtils::MakeMaker" : "6.62"
+ }
+ },
+ "runtime" : {
+ "requires" : {
+ "File::Spec" : "0.80",
+ "List::Util" : "1.18",
+ "perl" : "5.006"
+ }
+ }
+ },
+ "release_status" : "stable",
+ "resources" : {
+ "license" : [
+ "http://dev.perl.org/licenses/"
+ ],
+ "repository" : {
+ "url" : "http://svn.ali.as/cpan/trunk/Class-Autouse"
+ },
+ "x_ChangeLog" : "http://fisheye2.atlassian.com/changelog/cpan/trunk/Class-Autouse"
+ },
+ "version" : "2.01",
+ "x_module_name" : "Class::Autouse"
+}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/Makefile.PL new/Class-Autouse-2.01/Makefile.PL
--- old/Class-Autouse-2.00/Makefile.PL 2011-01-18 01:02:20.000000000 +0100
+++ new/Class-Autouse-2.01/Makefile.PL 2012-02-03 08:55:57.000000000 +0100
@@ -1,8 +1,6 @@
-use inc::Module::Install::DSL 1.00;
+use inc::Module::Install::DSL 1.04;
all_from lib/Class/Autouse.pm
requires_from lib/Class/Autouse.pm
-requires File::Spec 0.80
-requires List::Util 1.19
test_requires Test::More 0.47
test_requires File::Temp 0.17
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/README new/Class-Autouse-2.01/README
--- old/Class-Autouse-2.00/README 2011-01-18 01:02:20.000000000 +0100
+++ new/Class-Autouse-2.01/README 2012-02-03 08:55:57.000000000 +0100
@@ -411,7 +411,7 @@
autoload, autoclass
COPYRIGHT
- Copyright 2002 - 2011 Adam Kennedy.
+ Copyright 2002 - 2012 Adam Kennedy.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/inc/Module/Install/Base.pm new/Class-Autouse-2.01/inc/Module/Install/Base.pm
--- old/Class-Autouse-2.00/inc/Module/Install/Base.pm 2011-01-18 01:03:20.000000000 +0100
+++ new/Class-Autouse-2.01/inc/Module/Install/Base.pm 2012-02-03 08:56:55.000000000 +0100
@@ -4,7 +4,7 @@
use strict 'vars';
use vars qw{$VERSION};
BEGIN {
- $VERSION = '1.00';
+ $VERSION = '1.04';
}
# Suspend handler for "redefined" warnings
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/inc/Module/Install/Can.pm new/Class-Autouse-2.01/inc/Module/Install/Can.pm
--- old/Class-Autouse-2.00/inc/Module/Install/Can.pm 2011-01-18 01:03:20.000000000 +0100
+++ new/Class-Autouse-2.01/inc/Module/Install/Can.pm 2012-02-03 08:56:55.000000000 +0100
@@ -9,7 +9,7 @@
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '1.00';
+ $VERSION = '1.04';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/inc/Module/Install/DSL.pm new/Class-Autouse-2.01/inc/Module/Install/DSL.pm
--- old/Class-Autouse-2.00/inc/Module/Install/DSL.pm 2011-01-18 01:03:20.000000000 +0100
+++ new/Class-Autouse-2.01/inc/Module/Install/DSL.pm 2012-02-03 08:56:55.000000000 +0100
@@ -4,7 +4,7 @@
use strict;
use vars qw{$VERSION $ISCORE};
BEGIN {
- $VERSION = '1.00';
+ $VERSION = '1.04';
$ISCORE = 1;
*inc::Module::Install::DSL::VERSION = *VERSION;
@inc::Module::Install::DSL::ISA = __PACKAGE__;
@@ -59,7 +59,8 @@
my @lines = grep { /\S/ } split /[\012\015]+/, $dsl;
# Each line represents one command
- my @code = ();
+ my @code = ();
+ my $static = 1;
foreach my $line ( @lines ) {
# Split the lines into tokens
my @tokens = split /\s+/, $line;
@@ -74,6 +75,10 @@
# This is the beginning of a suffix
push @suffix, $token;
push @suffix, @tokens;
+
+ # The conditional means this distribution
+ # can no longer be considered fully static.
+ $static = 0;
last;
} else {
# Convert to a string
@@ -87,6 +92,9 @@
push @code, join( ' ', @tokens ) . ";\n";
}
+ # Is our configuration static?
+ push @code, "static_config;\n" if $static;
+
# Join into the complete code block
return join( '', @code );
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/inc/Module/Install/Fetch.pm new/Class-Autouse-2.01/inc/Module/Install/Fetch.pm
--- old/Class-Autouse-2.00/inc/Module/Install/Fetch.pm 2011-01-18 01:03:20.000000000 +0100
+++ new/Class-Autouse-2.01/inc/Module/Install/Fetch.pm 2012-02-03 08:56:55.000000000 +0100
@@ -6,7 +6,7 @@
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '1.00';
+ $VERSION = '1.04';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/inc/Module/Install/Makefile.pm new/Class-Autouse-2.01/inc/Module/Install/Makefile.pm
--- old/Class-Autouse-2.00/inc/Module/Install/Makefile.pm 2011-01-18 01:03:20.000000000 +0100
+++ new/Class-Autouse-2.01/inc/Module/Install/Makefile.pm 2012-02-03 08:56:55.000000000 +0100
@@ -8,7 +8,7 @@
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '1.00';
+ $VERSION = '1.04';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
@@ -219,14 +219,14 @@
# an underscore, even though its own version may contain one!
# Hence the funny regexp to get rid of it. See RT #35800
# for details.
- my $v = $ExtUtils::MakeMaker::VERSION =~ /^(\d+\.\d+)/;
+ my ($v) = $ExtUtils::MakeMaker::VERSION =~ /^(\d+\.\d+)/;
$self->build_requires( 'ExtUtils::MakeMaker' => $v );
$self->configure_requires( 'ExtUtils::MakeMaker' => $v );
} else {
# Allow legacy-compatibility with 5.005 by depending on the
# most recent EU:MM that supported 5.005.
- $self->build_requires( 'ExtUtils::MakeMaker' => 6.42 );
- $self->configure_requires( 'ExtUtils::MakeMaker' => 6.42 );
+ $self->build_requires( 'ExtUtils::MakeMaker' => 6.36 );
+ $self->configure_requires( 'ExtUtils::MakeMaker' => 6.36 );
}
# Generate the MakeMaker params
@@ -241,7 +241,6 @@
'all_from' if you prefer) in Makefile.PL.
EOT
- $DB::single = 1;
if ( $self->tests ) {
my @tests = split ' ', $self->tests;
my %seen;
@@ -412,4 +411,4 @@
__END__
-#line 541
+#line 540
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/inc/Module/Install/Metadata.pm new/Class-Autouse-2.01/inc/Module/Install/Metadata.pm
--- old/Class-Autouse-2.00/inc/Module/Install/Metadata.pm 2011-01-18 01:03:20.000000000 +0100
+++ new/Class-Autouse-2.01/inc/Module/Install/Metadata.pm 2012-02-03 08:56:55.000000000 +0100
@@ -6,7 +6,7 @@
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '1.00';
+ $VERSION = '1.04';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
@@ -151,15 +151,21 @@
sub install_as_vendor { $_[0]->installdirs('vendor') }
sub dynamic_config {
- my $self = shift;
- unless ( @_ ) {
- warn "You MUST provide an explicit true/false value to dynamic_config\n";
- return $self;
+ my $self = shift;
+ my $value = @_ ? shift : 1;
+ if ( $self->{values}->{dynamic_config} ) {
+ # Once dynamic we never change to static, for safety
+ return 0;
}
- $self->{values}->{dynamic_config} = $_[0] ? 1 : 0;
+ $self->{values}->{dynamic_config} = $value ? 1 : 0;
return 1;
}
+# Convenience command
+sub static_config {
+ shift->dynamic_config(0);
+}
+
sub perl_version {
my $self = shift;
return $self->{values}->{perl_version} unless @_;
@@ -170,7 +176,7 @@
# Normalize the version
$version = $self->_perl_version($version);
- # We don't support the reall old versions
+ # We don't support the really old versions
unless ( $version >= 5.005 ) {
die "Module::Install only supports 5.005 or newer (use ExtUtils::MakeMaker)\n";
}
@@ -515,6 +521,7 @@
'GNU Free Documentation license' => 'unrestricted', 1,
'GNU Affero General Public License' => 'open_source', 1,
'(?:Free)?BSD license' => 'bsd', 1,
+ 'Artistic license 2\.0' => 'artistic_2', 1,
'Artistic license' => 'artistic', 1,
'Apache (?:Software )?license' => 'apache', 1,
'GPL' => 'gpl', 1,
@@ -550,9 +557,9 @@
sub _extract_bugtracker {
my @links = $_[0] =~ m#L<(
- \Qhttp://rt.cpan.org/\E[^>]+|
- \Qhttp://github.com/\E[\w_]+/[\w_]+/issues|
- \Qhttp://code.google.com/p/\E[\w_\-]+/issues/list
+ https?\Q://rt.cpan.org/\E[^>]+|
+ https?\Q://github.com/\E[\w_]+/[\w_]+/issues|
+ https?\Q://code.google.com/p/\E[\w_\-]+/issues/list
)>#gx;
my %links;
@links{@links}=();
@@ -581,7 +588,7 @@
sub requires_from {
my $self = shift;
my $content = Module::Install::_readperl($_[0]);
- my @requires = $content =~ m/^use\s+([^\W\d]\w*(?:::\w+)*)\s+([\d\.]+)/mg;
+ my @requires = $content =~ m/^use\s+([^\W\d]\w*(?:::\w+)*)\s+(v?[\d\.]+)/mg;
while ( @requires ) {
my $module = shift @requires;
my $version = shift @requires;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/inc/Module/Install/Win32.pm new/Class-Autouse-2.01/inc/Module/Install/Win32.pm
--- old/Class-Autouse-2.00/inc/Module/Install/Win32.pm 2011-01-18 01:03:20.000000000 +0100
+++ new/Class-Autouse-2.01/inc/Module/Install/Win32.pm 2012-02-03 08:56:55.000000000 +0100
@@ -6,7 +6,7 @@
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '1.00';
+ $VERSION = '1.04';
@ISA = 'Module::Install::Base';
$ISCORE = 1;
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/inc/Module/Install/WriteAll.pm new/Class-Autouse-2.01/inc/Module/Install/WriteAll.pm
--- old/Class-Autouse-2.00/inc/Module/Install/WriteAll.pm 2011-01-18 01:03:20.000000000 +0100
+++ new/Class-Autouse-2.01/inc/Module/Install/WriteAll.pm 2012-02-03 08:56:55.000000000 +0100
@@ -6,7 +6,7 @@
use vars qw{$VERSION @ISA $ISCORE};
BEGIN {
- $VERSION = '1.00';
+ $VERSION = '1.04';
@ISA = qw{Module::Install::Base};
$ISCORE = 1;
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/inc/Module/Install.pm new/Class-Autouse-2.01/inc/Module/Install.pm
--- old/Class-Autouse-2.00/inc/Module/Install.pm 2011-01-18 01:03:19.000000000 +0100
+++ new/Class-Autouse-2.01/inc/Module/Install.pm 2012-02-03 08:56:55.000000000 +0100
@@ -31,7 +31,7 @@
# This is not enforced yet, but will be some time in the next few
# releases once we can make sure it won't clash with custom
# Module::Install extensions.
- $VERSION = '1.00';
+ $VERSION = '1.04';
# Storage for the pseudo-singleton
$MAIN = undef;
@@ -451,7 +451,7 @@
}
sub _cmp ($$) {
- _version($_[0]) <=> _version($_[1]);
+ _version($_[1]) <=> _version($_[2]);
}
# Cloned from Params::Util::_CLASS
@@ -467,4 +467,4 @@
1;
-# Copyright 2008 - 2010 Adam Kennedy.
+# Copyright 2008 - 2011 Adam Kennedy.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/lib/Class/Autouse/Parent.pm new/Class-Autouse-2.01/lib/Class/Autouse/Parent.pm
--- old/Class-Autouse-2.00/lib/Class/Autouse/Parent.pm 2011-01-18 01:02:20.000000000 +0100
+++ new/Class-Autouse-2.01/lib/Class/Autouse/Parent.pm 2012-02-03 08:55:57.000000000 +0100
@@ -10,7 +10,7 @@
our $VERSION;
BEGIN {
- $VERSION = '2.00';
+ $VERSION = '2.01';
}
# Anti-loop protection.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/lib/Class/Autouse.pm new/Class-Autouse-2.01/lib/Class/Autouse.pm
--- old/Class-Autouse-2.00/lib/Class/Autouse.pm 2011-01-18 01:02:20.000000000 +0100
+++ new/Class-Autouse-2.01/lib/Class/Autouse.pm 2012-02-03 08:55:57.000000000 +0100
@@ -15,9 +15,14 @@
use List::Util 1.18 ();
use Scalar::Util ();
+# Globals
+use vars qw{ $VERSION @ISA $DB $DEBUG };
+use vars qw{ $DEVEL $SUPERLOAD $NOSTAT $NOPREBLESS $STATICISA }; # Load environment
+use vars qw{ %SPECIAL %LOADED %BAD %TRIED_CLASS %TRIED_METHOD }; # Special cases
+use vars qw{ @LOADERS @SUGAR $HOOKS $ORIGINAL_CAN $ORIGINAL_ISA }; # Working information
+
# Handle optimisation switches via constants to allow debugging and
# similar functions to be optimised out at compile time if not in use.
-our ($DB, $DEBUG);
BEGIN {
$DB = 0 unless defined &DB::DB;
$DEBUG = 0 unless defined $DEBUG;
@@ -26,15 +31,9 @@
use constant DEBUG => !! $DEBUG;
print "Class::Autouse -> Debugging Activated.\n" if DEBUG;
-# Globals
-use vars qw{ $VERSION @ISA };
-use vars qw{ $DEVEL $SUPERLOAD $NOSTAT $NOPREBLESS $STATICISA }; # Load environment
-use vars qw{ %SPECIAL %LOADED %BAD %TRIED_CLASS %TRIED_METHOD }; # Special cases
-use vars qw{ @LOADERS @SUGAR $HOOKS $ORIGINAL_CAN $ORIGINAL_ISA }; # Working information
-
# Compile-time Initialisation and Optimisation
BEGIN {
- $VERSION = '2.00';
+ $VERSION = '2.01';
# Become an exporter so we don't get complaints when we act as a pragma.
# I don't fully understand the reason for this, but it works and I can't
@@ -752,7 +751,7 @@
# Handle the most likely case
my $class = shift or return undef;
- return 1 if defined @{"${class}::ISA"};
+ return 1 if @{"${class}::ISA"};
# Get the list of glob names, ignoring namespaces
foreach ( keys %{"${class}::"} ) {
@@ -764,9 +763,7 @@
# This is a Class::Autouse hook. Ignore.
next;
}
- else {
- return 1;
- }
+ return 1;
}
}
@@ -1325,7 +1322,7 @@
=head1 COPYRIGHT
-Copyright 2002 - 2011 Adam Kennedy.
+Copyright 2002 - 2012 Adam Kennedy.
This program is free software; you can redistribute
it and/or modify it under the same terms as Perl itself.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Class-Autouse-2.00/xt/pmv.t new/Class-Autouse-2.01/xt/pmv.t
--- old/Class-Autouse-2.00/xt/pmv.t 2011-01-18 01:02:20.000000000 +0100
+++ new/Class-Autouse-2.01/xt/pmv.t 2012-02-03 08:55:57.000000000 +0100
@@ -9,7 +9,7 @@
}
my @MODULES = (
- 'Perl::MinimumVersion 1.25',
+ 'Perl::MinimumVersion 1.27',
'Test::MinimumVersion 0.101080',
);
--
To unsubscribe, e-mail: opensuse-commit+unsubscribe@opensuse.org
For additional commands, e-mail: opensuse-commit+help@opensuse.org