r71951 - in /branches/upstream/libmoosex-nonmoose-perl/current: ./ lib/MooseX/ lib/MooseX/NonMoose/ lib/MooseX/NonMoose/Meta/Role/ t/
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Fri Mar 25 01:16:18 UTC 2011
Author: jawnsy-guest
Date: Fri Mar 25 01:15:28 2011
New Revision: 71951
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=71951
Log:
[svn-upgrade] new version libmoosex-nonmoose-perl (0.20)
Modified:
branches/upstream/libmoosex-nonmoose-perl/current/Changes
branches/upstream/libmoosex-nonmoose-perl/current/META.json
branches/upstream/libmoosex-nonmoose-perl/current/META.yml
branches/upstream/libmoosex-nonmoose-perl/current/Makefile.PL
branches/upstream/libmoosex-nonmoose-perl/current/README
branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose.pm
branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose/InsideOut.pm
branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose/Meta/Role/Class.pm
branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose/Meta/Role/Constructor.pm
branches/upstream/libmoosex-nonmoose-perl/current/t/26-no-new-constructor-error.t
Modified: branches/upstream/libmoosex-nonmoose-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-nonmoose-perl/current/Changes?rev=71951&op=diff
==============================================================================
--- branches/upstream/libmoosex-nonmoose-perl/current/Changes (original)
+++ branches/upstream/libmoosex-nonmoose-perl/current/Changes Fri Mar 25 01:15:28 2011
@@ -1,4 +1,8 @@
Revision history for MooseX-NonMoose
+
+0.20 2011-03-22
+ - fix warning when passing inline_constructor => 0 with no superclass new
+ method (rafl).
0.19 2011-03-02
- don't die if superclass doesn't have a 'new' method
Modified: branches/upstream/libmoosex-nonmoose-perl/current/META.json
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-nonmoose-perl/current/META.json?rev=71951&op=diff
==============================================================================
--- branches/upstream/libmoosex-nonmoose-perl/current/META.json (original)
+++ branches/upstream/libmoosex-nonmoose-perl/current/META.json Fri Mar 25 01:15:28 2011
@@ -40,7 +40,7 @@
"web" : "http://github.com/doy/moosex-nonmoose"
}
},
- "version" : "0.19",
+ "version" : "0.20",
"x_Dist_Zilla" : {
"plugins" : [
{
Modified: branches/upstream/libmoosex-nonmoose-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-nonmoose-perl/current/META.yml?rev=71951&op=diff
==============================================================================
--- branches/upstream/libmoosex-nonmoose-perl/current/META.yml (original)
+++ branches/upstream/libmoosex-nonmoose-perl/current/META.yml Fri Mar 25 01:15:28 2011
@@ -19,7 +19,7 @@
Moose: 1.15
resources:
repository: git://github.com/doy/moosex-nonmoose.git
-version: 0.19
+version: 0.20
x_Dist_Zilla:
plugins:
-
Modified: branches/upstream/libmoosex-nonmoose-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-nonmoose-perl/current/Makefile.PL?rev=71951&op=diff
==============================================================================
--- branches/upstream/libmoosex-nonmoose-perl/current/Makefile.PL (original)
+++ branches/upstream/libmoosex-nonmoose-perl/current/Makefile.PL Fri Mar 25 01:15:28 2011
@@ -26,7 +26,7 @@
'List::MoreUtils' => '0',
'Moose' => '1.15'
},
- 'VERSION' => '0.19',
+ 'VERSION' => '0.20',
'test' => {
'TESTS' => 't/*.t'
}
Modified: branches/upstream/libmoosex-nonmoose-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-nonmoose-perl/current/README?rev=71951&op=diff
==============================================================================
--- branches/upstream/libmoosex-nonmoose-perl/current/README (original)
+++ branches/upstream/libmoosex-nonmoose-perl/current/README Fri Mar 25 01:15:28 2011
@@ -1,7 +1,7 @@
This archive contains the distribution MooseX-NonMoose,
-version 0.19:
+version 0.20:
easy subclassing of non-Moose classes
Modified: branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose.pm?rev=71951&op=diff
==============================================================================
--- branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose.pm (original)
+++ branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose.pm Fri Mar 25 01:15:28 2011
@@ -1,6 +1,6 @@
package MooseX::NonMoose;
BEGIN {
- $MooseX::NonMoose::VERSION = '0.19';
+ $MooseX::NonMoose::VERSION = '0.20';
}
use Moose::Exporter;
# ABSTRACT: easy subclassing of non-Moose classes
@@ -35,7 +35,7 @@
=head1 VERSION
-version 0.19
+version 0.20
=head1 SYNOPSIS
Modified: branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose/InsideOut.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose/InsideOut.pm?rev=71951&op=diff
==============================================================================
--- branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose/InsideOut.pm (original)
+++ branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose/InsideOut.pm Fri Mar 25 01:15:28 2011
@@ -1,6 +1,6 @@
package MooseX::NonMoose::InsideOut;
BEGIN {
- $MooseX::NonMoose::InsideOut::VERSION = '0.19';
+ $MooseX::NonMoose::InsideOut::VERSION = '0.20';
}
use Moose::Exporter;
# ABSTRACT: easy subclassing of non-Moose non-hashref classes
@@ -36,7 +36,7 @@
=head1 VERSION
-version 0.19
+version 0.20
=head1 SYNOPSIS
Modified: branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose/Meta/Role/Class.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose/Meta/Role/Class.pm?rev=71951&op=diff
==============================================================================
--- branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose/Meta/Role/Class.pm (original)
+++ branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose/Meta/Role/Class.pm Fri Mar 25 01:15:28 2011
@@ -1,6 +1,6 @@
package MooseX::NonMoose::Meta::Role::Class;
BEGIN {
- $MooseX::NonMoose::Meta::Role::Class::VERSION = '0.19';
+ $MooseX::NonMoose::Meta::Role::Class::VERSION = '0.20';
}
use Moose::Role;
use List::MoreUtils qw(any);
@@ -29,6 +29,10 @@
return (@options, inline_constructor => 0)
unless $cc_meta->can('does_role')
&& $cc_meta->does_role('MooseX::NonMoose::Meta::Role::Constructor');
+
+ # do nothing if we explicitly ask for the constructor to not be inlined
+ my %options = @options;
+ return @options if !$options{inline_constructor};
# XXX: get constructor name from the constructor metaclass?
my $local_constructor = $self->get_method('new');
@@ -49,10 +53,6 @@
# though
return @options
if $local_constructor->isa('Class::MOP::Method::Wrapped');
-
- # do nothing if we explicitly ask for the constructor to not be inlined
- my %options = @options;
- return @options if !$options{inline_constructor};
# otherwise, explicitly ask for the constructor to be replaced (to suppress
# the warning message), since this is the expected usage, and shouldn't
@@ -292,7 +292,7 @@
=head1 VERSION
-version 0.19
+version 0.20
=head1 SYNOPSIS
Modified: branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose/Meta/Role/Constructor.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose/Meta/Role/Constructor.pm?rev=71951&op=diff
==============================================================================
--- branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose/Meta/Role/Constructor.pm (original)
+++ branches/upstream/libmoosex-nonmoose-perl/current/lib/MooseX/NonMoose/Meta/Role/Constructor.pm Fri Mar 25 01:15:28 2011
@@ -1,6 +1,6 @@
package MooseX::NonMoose::Meta::Role::Constructor;
BEGIN {
- $MooseX::NonMoose::Meta::Role::Constructor::VERSION = '0.19';
+ $MooseX::NonMoose::Meta::Role::Constructor::VERSION = '0.20';
}
use Moose::Role;
# ABSTRACT: constructor method trait for L<MooseX::NonMoose>
@@ -88,7 +88,7 @@
=head1 VERSION
-version 0.19
+version 0.20
=head1 SYNOPSIS
Modified: branches/upstream/libmoosex-nonmoose-perl/current/t/26-no-new-constructor-error.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libmoosex-nonmoose-perl/current/t/26-no-new-constructor-error.t?rev=71951&op=diff
==============================================================================
--- branches/upstream/libmoosex-nonmoose-perl/current/t/26-no-new-constructor-error.t (original)
+++ branches/upstream/libmoosex-nonmoose-perl/current/t/26-no-new-constructor-error.t Fri Mar 25 01:15:28 2011
@@ -23,4 +23,18 @@
}
}
+{
+ package ChildTwo;
+ use Moose;
+ use MooseX::NonMoose;
+ extends 'NonMoose';
+ {
+ my $warning;
+ local $SIG{__WARN__} = sub { $warning = $_[0] };
+ __PACKAGE__->meta->make_immutable(inline_constructor => 0);
+ ::is($warning, undef,
+ "no warning when trying to make_immutable(inline_constructor => 0) without a superclass 'new'");
+ }
+}
+
done_testing;
More information about the Pkg-perl-cvs-commits
mailing list