Merge branch 'master' of git.moose.perl.org:Moose

diff --git a/Makefile.PL b/Makefile.PL
index 70fdcde..4777e74 100644 (file)
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -1,6 +1,6 @@
 use strict;
 use warnings;
-use inc::Module::Install 0.97;
+use inc::Module::Install 0.98;
 use Module::Install::AuthorRequires;
 use 5.008001;
 
@@ -39,6 +39,7 @@ if ( is_maintainer() ) {
 tests_recursive();
 
 repository 'git://git.moose.perl.org/Moose.git';
+add_metadata(x_authority => 'cpan:STEVAN');
 
 WriteAll();
 

diff --git a/lib/Moose.pm b/lib/Moose.pm
index c0ddafe..4299f73 100644 (file)
--- a/lib/Moose.pm
+++ b/lib/Moose.pm
@@ -354,7 +354,10 @@ Much of the Moose documentation has been translated into other languages.
 
 =item Japanese
 
-Japanese docs can be found at L<http://perldoc.perlassociation.org/pod/Moose-Doc-JA/index.html>. The source POD files can be found in GitHub: L<http://github.com/jpa/Moose-Doc-JA>
+Japanese docs can be found at
+L<http://perldoc.perlassociation.org/pod/Moose-Doc-JA/index.html>. The
+source POD files can be found in GitHub:
+L<http://github.com/jpa/Moose-Doc-JA>
 
 =back
 

diff --git a/lib/Moose/Meta/TypeConstraint.pm b/lib/Moose/Meta/TypeConstraint.pm
index 48c5ec4..791965f 100644 (file)
--- a/lib/Moose/Meta/TypeConstraint.pm
+++ b/lib/Moose/Meta/TypeConstraint.pm
@@ -135,7 +135,7 @@ sub equals {
 
     my $other = Moose::Util::TypeConstraints::find_type_constraint($type_or_name) or return;
 
-    return 1 if 0+$self == 0+$other;
+    return 1 if $self == $other;
 
     if ( $self->has_hand_optimized_type_constraint and $other->has_hand_optimized_type_constraint ) {
         return 1 if $self->hand_optimized_type_constraint == $other->hand_optimized_type_constraint;