added has_available_type_export introspection utility function

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

diff --git a/lib/MooseX/Types/Base.pm b/lib/MooseX/Types/Base.pm
index 15ba3e4..3b2b40e 100644 (file)
--- a/lib/MooseX/Types/Base.pm
+++ b/lib/MooseX/Types/Base.pm
@@ -67,7 +67,10 @@ sub import {
         # the type itself
         push @{ $ex_spec{exports} }, 
             $type_short,
-            sub { $wrapper->type_export_generator($type_short, $type_full) };
+            sub { 
+                bless $wrapper->type_export_generator($type_short, $type_full),
+                    'MooseX::Types::EXPORTED_TYPE_CONSTRAINT';
+            };
 
         # the check helper
         push @{ $ex_spec{exports} },