$^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}}){
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(
=head1 VERSION
-This document describes Mouse version 0.39
+This document describes Mouse version 0.40_02
=head1 SYNOPSIS