don't look in the stash for type names containing ::

doy · Sep 6, 2011 · 7a7fc37 · 7a7fc37
1 parent de28696
commit 7a7fc37
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 1 deletion.
diff --git a/Changes b/Changes
@@ -1,5 +1,8 @@
 Changelog for Parse::Method::Signatures
 
+1.003014
+  - Don't look in the stash for type names containing :: (Jesse Luehrs)
+
 1.003013 - 2010/01/08
   - Add version to List::MoreUtils as we need part() (Leo Lapworth)
 

diff --git a/lib/Parse/Method/Signatures/TypeConstraint.pm b/lib/Parse/Method/Signatures/TypeConstraint.pm
@@ -49,7 +49,7 @@ sub find_registered_constraint {
                   "definition into a type library or a BEGIN block.\n"
                 if $type && $type->isa('MooseX::Types::UndefinedType');
         }
-        else {
+        elsif ($name !~ /::/) {
             my $meta  = Class::MOP::class_of($pkg) || Class::MOP::Class->initialize($pkg);
             my $func  = $meta->get_package_symbol('&' . $name);
             my $proto = prototype $func if $func;