Version 0.16.

[gitmo/MooseX-Types-Structured.git] / lib / MooseX / Types / Structured.pm

diff --git a/lib/MooseX/Types/Structured.pm b/lib/MooseX/Types/Structured.pm
index b0ee907..1c9c614 100644 (file)
--- a/lib/MooseX/Types/Structured.pm
+++ b/lib/MooseX/Types/Structured.pm
@@ -10,7 +10,7 @@ use Sub::Exporter -setup => { exports => [ qw(Dict Tuple Optional slurpy) ] };
 use Devel::PartialDump;
 use Scalar::Util qw(blessed);
 
-our $VERSION = '0.13';
+our $VERSION = '0.16';
 our $AUTHORITY = 'cpan:JJNAPIORK';
 
 =head1 NAME
@@ -659,7 +659,7 @@ Moose::Util::TypeConstraints::get_type_constraint_registry->add_type_constraint(
              @$type_constraints : ();
             
             my $overflow_handler;
-            if(blessed $type_constraints[-1]
+            if($type_constraints[-1] && blessed $type_constraints[-1]
               && $type_constraints[-1]->isa('MooseX::Types::Structured::OverflowHandler')) {
                 $overflow_handler = pop @type_constraints;
             }
@@ -716,7 +716,7 @@ Moose::Util::TypeConstraints::get_type_constraint_registry->add_type_constraint(
              @$type_constraints : ();
             
             my $overflow_handler;
-            if(blessed $type_constraints[-1]
+            if($type_constraints[-1] && blessed $type_constraints[-1]
               && $type_constraints[-1]->isa('MooseX::Types::Structured::OverflowHandler')) {
                 $overflow_handler = pop @type_constraints;
             } 
@@ -814,14 +814,24 @@ All POD examples need test cases in t/documentation/*.t
 Want to break out the examples section to a separate cookbook style POD.
 Want more examples and best practice / usage guidance for authors
 Need to clarify deep coercions, 
-Need to clarify subtypes of subtypes.
 
 =head1 AUTHOR
 
+Copyright 2008-2009, John Napiorkowski <jjnapiork@cpan.org>
+
 John Napiorkowski, C<< <jjnapiork@cpan.org> >>
 
+=head1 CONTRIBUTORS
+
+The Following people have contributed to this module:
+
+    Florian Ragwitz, C<< <rafl@debian.org> >>
+    Yuval Kogman, C<< <nothingmuch@woobling.org> >>
+
 =head1 COPYRIGHT & LICENSE
 
+Copyright 2008-2009, John Napiorkowski <jjnapiork@cpan.org>
+
 This program is free software; you can redistribute it and/or modify
 it under the same terms as Perl itself.