removed the Data::Dump debugging code
[gitmo/MooseX-Types.git] / lib / MooseX / Types / Base.pm
index 15ba3e4..e7ab791 100644 (file)
@@ -7,7 +7,6 @@ MooseX::Types::Base - Type library base class
 
 =cut
 
-#use Data::Dump                      qw( dump );
 use Carp::Clan                      qw( ^MooseX::Types );
 use MooseX::Types::Util             qw( filter_tags );
 use Sub::Exporter                   qw( build_exporter );
@@ -67,7 +66,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} },