X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=lib%2FMouse%2FExporter.pm;h=8be55d94c525257ff150c4692238d0333edf65cf;hp=2b25018f71983d01e78d12ba15665118a2a76a57;hb=065f79e7cd03765f26c6ea276aaf9b3c5897886a;hpb=45bbec05d8a9057428aa9399662297300d79b791 diff --git a/lib/Mouse/Exporter.pm b/lib/Mouse/Exporter.pm index 2b25018..8be55d9 100644 --- a/lib/Mouse/Exporter.pm +++ b/lib/Mouse/Exporter.pm @@ -168,11 +168,6 @@ sub do_import { $^H |= _strict_bits; # strict->import; ${^WARNING_BITS} = $warnings::Bits{all}; # warnings->import; - if($into eq 'main' && !$spec->{_export_to_main}){ - warn qq{$package does not export its sugar to the 'main' package.\n}; - return; - } - if($spec->{INIT_META}){ my $meta; foreach my $init_meta(@{$spec->{INIT_META}}){ @@ -185,8 +180,6 @@ sub do_import { map{ ref($_) ? $_ : Mouse::Util::resolve_metaclass_alias($type => $_, trait => 1) } @traits; - print "[@traits]\n"; - not_supported('-traits'); require Mouse::Util::MetaRole; Mouse::Util::MetaRole::apply_metaclass_roles( @@ -265,7 +258,7 @@ Mouse::Exporter - make an import() and unimport() just like Mouse.pm =head1 VERSION -This document describes Mouse version 0.39 +This document describes Mouse version 0.40_02 =head1 SYNOPSIS