X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FTypes%2FBase.pm;h=3b2b40e78456b5f12a40771a3e71e4e9ecc1beb6;hb=5885c4f4e1f234e7521f952bd1c1956395494c1e;hp=15ba3e492af1929a868d55dd60340a9aa4e09f68;hpb=5a9b6d38459e9fde284735a9ddc28cec3b30d366;p=gitmo%2FMooseX-Types.git diff --git a/lib/MooseX/Types/Base.pm b/lib/MooseX/Types/Base.pm index 15ba3e4..3b2b40e 100644 --- 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} },