X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse%2FExporter.pm;h=4646a1fb6f6beb965c7421649300b5e26ae1530a;hb=61fcd0dad2a4b4bc1f616b95b9c162597098503a;hp=91ccff010fa2dc7f40ae382db679f32394081a22;hpb=e6dc493dcf34553b9726d220f7aa42b0fc50eea5;p=gitmo%2FMouse.git diff --git a/lib/Mouse/Exporter.pm b/lib/Mouse/Exporter.pm index 91ccff0..4646a1f 100644 --- a/lib/Mouse/Exporter.pm +++ b/lib/Mouse/Exporter.pm @@ -102,7 +102,7 @@ sub build_import_methods{ if(my $init_meta = $package->can('init_meta')){ if(!grep{ $_ == $init_meta } @init_meta_methods){ - unshift @init_meta_methods, $init_meta; + push @init_meta_methods, $init_meta; } } } @@ -161,11 +161,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}){ foreach my $init_meta(@{$spec->{INIT_META}}){ $into->$init_meta(for_class => $into); @@ -241,6 +236,10 @@ __END__ Mouse::Exporter - make an import() and unimport() just like Mouse.pm +=head1 VERSION + +This document describes Mouse version 0.39 + =head1 SYNOPSIS package MyApp::Mouse;