r73373 - in /trunk/libmoosex-strictconstructor-perl: ./ debian/ debian/source/ lib/MooseX/ lib/MooseX/StrictConstructor/Role/ lib/MooseX/StrictConstructor/Trait/ lib/MooseX/StrictConstructor/Trait/Method/
ansgar at users.alioth.debian.org
ansgar at users.alioth.debian.org
Sun Apr 24 10:46:26 UTC 2011
Author: ansgar
Date: Sun Apr 24 10:46:05 2011
New Revision: 73373
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=73373
Log:
New upstream release.
Added:
trunk/libmoosex-strictconstructor-perl/debian/source/local-options
Removed:
trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor/Role/
Modified:
trunk/libmoosex-strictconstructor-perl/Changes
trunk/libmoosex-strictconstructor-perl/MANIFEST
trunk/libmoosex-strictconstructor-perl/META.json
trunk/libmoosex-strictconstructor-perl/META.yml
trunk/libmoosex-strictconstructor-perl/Makefile.PL
trunk/libmoosex-strictconstructor-perl/README
trunk/libmoosex-strictconstructor-perl/SIGNATURE
trunk/libmoosex-strictconstructor-perl/debian/changelog
trunk/libmoosex-strictconstructor-perl/dist.ini
trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor.pm
trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor/Trait/Class.pm
trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor/Trait/Method/Constructor.pm
Modified: trunk/libmoosex-strictconstructor-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-strictconstructor-perl/Changes?rev=73373&op=diff
==============================================================================
--- trunk/libmoosex-strictconstructor-perl/Changes (original)
+++ trunk/libmoosex-strictconstructor-perl/Changes Sun Apr 24 10:46:05 2011
@@ -1,3 +1,9 @@
+0.16 2011-04-22
+
+- Don't wrap BUILDALL, since this breaks if the object doesn't inherit from
+ Moose::Object (doy).
+
+
0.15 2011-04-13
- The fix in 0.14 only worked with Moose 2.0, causing failures with earlier
Modified: trunk/libmoosex-strictconstructor-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-strictconstructor-perl/MANIFEST?rev=73373&op=diff
==============================================================================
--- trunk/libmoosex-strictconstructor-perl/MANIFEST (original)
+++ trunk/libmoosex-strictconstructor-perl/MANIFEST Sun Apr 24 10:46:05 2011
@@ -9,7 +9,6 @@
SIGNATURE
dist.ini
lib/MooseX/StrictConstructor.pm
-lib/MooseX/StrictConstructor/Role/Object.pm
lib/MooseX/StrictConstructor/Trait/Class.pm
lib/MooseX/StrictConstructor/Trait/Method/Constructor.pm
t/basic.t
Modified: trunk/libmoosex-strictconstructor-perl/META.json
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-strictconstructor-perl/META.json?rev=73373&op=diff
==============================================================================
--- trunk/libmoosex-strictconstructor-perl/META.json (original)
+++ trunk/libmoosex-strictconstructor-perl/META.json Sun Apr 24 10:46:05 2011
@@ -44,6 +44,6 @@
"web" : "http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo/MooseX-StrictConstructor.git;a=summary"
}
},
- "version" : "0.15"
+ "version" : "0.16"
}
Modified: trunk/libmoosex-strictconstructor-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-strictconstructor-perl/META.yml?rev=73373&op=diff
==============================================================================
--- trunk/libmoosex-strictconstructor-perl/META.yml (original)
+++ trunk/libmoosex-strictconstructor-perl/META.yml Sun Apr 24 10:46:05 2011
@@ -20,4 +20,4 @@
resources:
bugtracker: http://rt.cpan.org/NoAuth/Bugs.html?Dist=MooseX-StrictConstructor
repository: git://git.moose.perl.org/MooseX-StrictConstructor.git
-version: 0.15
+version: 0.16
Modified: trunk/libmoosex-strictconstructor-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-strictconstructor-perl/Makefile.PL?rev=73373&op=diff
==============================================================================
--- trunk/libmoosex-strictconstructor-perl/Makefile.PL (original)
+++ trunk/libmoosex-strictconstructor-perl/Makefile.PL Sun Apr 24 10:46:05 2011
@@ -26,7 +26,7 @@
'Moose' => '0.94',
'namespace::autoclean' => '0'
},
- 'VERSION' => '0.15',
+ 'VERSION' => '0.16',
'test' => {
'TESTS' => 't/*.t'
}
Modified: trunk/libmoosex-strictconstructor-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-strictconstructor-perl/README?rev=73373&op=diff
==============================================================================
--- trunk/libmoosex-strictconstructor-perl/README (original)
+++ trunk/libmoosex-strictconstructor-perl/README Sun Apr 24 10:46:05 2011
@@ -1,7 +1,7 @@
This archive contains the distribution MooseX-StrictConstructor,
-version 0.15:
+version 0.16:
Make your object constructors blow up on unknown attributes
Modified: trunk/libmoosex-strictconstructor-perl/SIGNATURE
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-strictconstructor-perl/SIGNATURE?rev=73373&op=diff
==============================================================================
--- trunk/libmoosex-strictconstructor-perl/SIGNATURE (original)
+++ trunk/libmoosex-strictconstructor-perl/SIGNATURE Sun Apr 24 10:46:05 2011
@@ -14,19 +14,18 @@
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
-SHA1 c31bf62712bb4a85632905dadfdcbcad9e90809c Changes
+SHA1 358b030a619370ea7359a866baedde5c719ea847 Changes
SHA1 b09c48494e1d0630c6bd6b11fef8e0ac35d509da INSTALL
SHA1 c715d20265d2931c7564fc64abfdc4f8ff33e297 LICENSE
-SHA1 b815cf8e0fa77a4b2a15e01518282ffbd68fd145 MANIFEST
-SHA1 f6ad790c9f354b00fa06904f9d8975c0867b6889 META.json
-SHA1 ac1c0d343670f5691cd8ed8db6410e2f30182a96 META.yml
-SHA1 4fb31c6112fac1fedde81ec64d443eb27ba0326e Makefile.PL
-SHA1 37cfb9149fa6fc6205d204481450f5e4e7f2f682 README
-SHA1 70ff27110cdc9239162c05d745ef8156d5eb2bda dist.ini
-SHA1 65dd30a7f16929bbe47acce37a5cac6262f28634 lib/MooseX/StrictConstructor.pm
-SHA1 ef7980b2328c56d7f559be2ac415b6304f60c0ac lib/MooseX/StrictConstructor/Role/Object.pm
-SHA1 32d5dc72f45ab6172e4777e6dc8de2776df6de64 lib/MooseX/StrictConstructor/Trait/Class.pm
-SHA1 6a6b8f6bef66e4fc0209d8dcd99f761bd1946c5a lib/MooseX/StrictConstructor/Trait/Method/Constructor.pm
+SHA1 3216b31652847aecf0a5a1d09c6edaab44442c64 MANIFEST
+SHA1 ab4aef0042f93aefcd71014e1cf93985c34d7b02 META.json
+SHA1 03bd578d7dc4ad35b1f583e16c00b540c6362f6a META.yml
+SHA1 1d18a87a69b5549170a6766c0175c0b977b10240 Makefile.PL
+SHA1 47723ff3c10caa4c1bb925272d6216035f7d6143 README
+SHA1 c680b8dbca6a46bcda6cb2a3384a3c87533e2290 dist.ini
+SHA1 048a8d21c1415ac0b28fbe5480d492cb4dd01815 lib/MooseX/StrictConstructor.pm
+SHA1 83e2d2032238372030d08daca7d4fbb464fe5226 lib/MooseX/StrictConstructor/Trait/Class.pm
+SHA1 3b12506e584abcf300a4b7f1f2d70092a96e048b lib/MooseX/StrictConstructor/Trait/Method/Constructor.pm
SHA1 4f5938ee545701adeec552fb3f898d4a5c147880 t/basic.t
SHA1 62e0d60d9456d31463f448be2265c9fc15efcceb t/instance.t
SHA1 a032c41ef6887fab1b900669c2d304fab46680e2 t/release-eol.t
@@ -37,7 +36,7 @@
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.10 (GNU/Linux)
-iEYEARECAAYFAk2l9kcACgkQIgMCsV8qvRJxWgCfY24Ui2bUGnomM0+T5E57w9+G
-JCgAnAkWv5/HaIsrM9xCg+2dFktF5Y3o
-=69v3
+iEYEARECAAYFAk2yHP4ACgkQIgMCsV8qvRKfJwCfYAhz4PJKqwEodUld2CX/y/Lj
+3IgAoJQImOdUqYu2EpyUc/0yyZwnbHdU
+=wHFF
-----END PGP SIGNATURE-----
Modified: trunk/libmoosex-strictconstructor-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-strictconstructor-perl/debian/changelog?rev=73373&op=diff
==============================================================================
--- trunk/libmoosex-strictconstructor-perl/debian/changelog (original)
+++ trunk/libmoosex-strictconstructor-perl/debian/changelog Sun Apr 24 10:46:05 2011
@@ -1,3 +1,9 @@
+libmoosex-strictconstructor-perl (0.16-1) unstable; urgency=low
+
+ * New upstream release.
+
+ -- Ansgar Burchardt <ansgar at debian.org> Sun, 24 Apr 2011 12:45:52 +0200
+
libmoosex-strictconstructor-perl (0.15-1) unstable; urgency=low
[ Ansgar Burchardt ]
Added: trunk/libmoosex-strictconstructor-perl/debian/source/local-options
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-strictconstructor-perl/debian/source/local-options?rev=73373&op=file
==============================================================================
--- trunk/libmoosex-strictconstructor-perl/debian/source/local-options (added)
+++ trunk/libmoosex-strictconstructor-perl/debian/source/local-options Sun Apr 24 10:46:05 2011
@@ -1,0 +1,2 @@
+abort-on-upstream-changes
+unapply-patches
Modified: trunk/libmoosex-strictconstructor-perl/dist.ini
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-strictconstructor-perl/dist.ini?rev=73373&op=diff
==============================================================================
--- trunk/libmoosex-strictconstructor-perl/dist.ini (original)
+++ trunk/libmoosex-strictconstructor-perl/dist.ini Sun Apr 24 10:46:05 2011
@@ -2,9 +2,11 @@
author = Dave Rolsky <autarch at urth.org>
license = Artistic_2_0
copyright_holder = Dave Rolsky
-copyright_year = 2011
-version = 0.15
+version = 0.16
+
+[NextRelease]
+format = %-8v %{yyyy-MM-dd}d
[@Basic]
Modified: trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor.pm?rev=73373&op=diff
==============================================================================
--- trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor.pm (original)
+++ trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor.pm Sun Apr 24 10:46:05 2011
@@ -1,6 +1,6 @@
package MooseX::StrictConstructor;
BEGIN {
- $MooseX::StrictConstructor::VERSION = '0.15';
+ $MooseX::StrictConstructor::VERSION = '0.16';
}
use strict;
@@ -9,7 +9,6 @@
use Moose 0.94 ();
use Moose::Exporter;
use Moose::Util::MetaRole;
-use MooseX::StrictConstructor::Role::Object;
{
my %class_meta = ( class => ['MooseX::StrictConstructor::Trait::Class'] );
@@ -22,8 +21,7 @@
}
Moose::Exporter->setup_import_methods(
- class_metaroles => \%class_meta,
- base_class_roles => ['MooseX::StrictConstructor::Role::Object'],
+ class_metaroles => \%class_meta,
);
}
@@ -41,7 +39,7 @@
=head1 VERSION
-version 0.15
+version 0.16
=head1 SYNOPSIS
Modified: trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor/Trait/Class.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor/Trait/Class.pm?rev=73373&op=diff
==============================================================================
--- trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor/Trait/Class.pm (original)
+++ trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor/Trait/Class.pm Sun Apr 24 10:46:05 2011
@@ -1,6 +1,6 @@
package MooseX::StrictConstructor::Trait::Class;
BEGIN {
- $MooseX::StrictConstructor::Trait::Class::VERSION = '0.15';
+ $MooseX::StrictConstructor::Trait::Class::VERSION = '0.16';
}
use Moose::Role;
@@ -8,6 +8,32 @@
use namespace::autoclean;
use B ();
+
+around new_object => sub {
+ my $orig = shift;
+ my $self = shift;
+ my $params = @_ == 1 ? $_[0] : {@_};
+ my $instance = $self->$orig(@_);
+
+ my %attrs = (
+ __INSTANCE__ => 1,
+ (
+ map { $_ => 1 }
+ grep {defined}
+ map { $_->init_arg() } $self->get_all_attributes()
+ )
+ );
+
+ my @bad = sort grep { !$attrs{$_} } keys %$params;
+
+ if (@bad) {
+ $self->throw_error(
+ "Found unknown attribute(s) init_arg passed to the constructor: @bad"
+ );
+ }
+
+ return $instance;
+};
around '_inline_BUILDALL' => sub {
my $orig = shift;
@@ -32,19 +58,6 @@
);
} if $Moose::VERSION >= 1.9900;
-# If the base class role is applied first, and then a superclass is added, we
-# lose the role.
-after superclasses => sub {
- my $self = shift;
-
- return unless @_;
-
- Moose::Util::MetaRole::apply_base_class_roles(
- for => $self->name(),
- roles => ['MooseX::StrictConstructor::Role::Object'],
- );
-};
-
1;
# ABSTRACT: A role to make immutable constructors strict
@@ -59,7 +72,7 @@
=head1 VERSION
-version 0.15
+version 0.16
=head1 DESCRIPTION
Modified: trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor/Trait/Method/Constructor.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor/Trait/Method/Constructor.pm?rev=73373&op=diff
==============================================================================
--- trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor/Trait/Method/Constructor.pm (original)
+++ trunk/libmoosex-strictconstructor-perl/lib/MooseX/StrictConstructor/Trait/Method/Constructor.pm Sun Apr 24 10:46:05 2011
@@ -1,6 +1,6 @@
package MooseX::StrictConstructor::Trait::Method::Constructor;
BEGIN {
- $MooseX::StrictConstructor::Trait::Method::Constructor::VERSION = '0.15';
+ $MooseX::StrictConstructor::Trait::Method::Constructor::VERSION = '0.16';
}
use Moose::Role;
@@ -50,7 +50,7 @@
=head1 VERSION
-version 0.15
+version 0.16
=head1 DESCRIPTION
More information about the Pkg-perl-cvs-commits
mailing list