X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse%2FExporter.pm;h=102165575c0648b8aeeb52d44cee942ab4fa9ea6;hb=29b12beade3d94ce04739d0c7c77316f528af9b2;hp=2b25018f71983d01e78d12ba15665118a2a76a57;hpb=45bbec05d8a9057428aa9399662297300d79b791;p=gitmo%2FMouse.git diff --git a/lib/Mouse/Exporter.pm b/lib/Mouse/Exporter.pm index 2b25018..1021655 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_01 =head1 SYNOPSIS