package MooseX::Types::Wrapper;
use Moose;
-use Carp qw( croak );
+use Carp::Clan qw( ^MooseX::Types );
use Class::MOP;
use namespace::clean -except => [qw( meta )];
= ($l eq 'Moose' ? 'MooseX::Types::Moose' : $l );
Class::MOP::load_class($library_class);
- $library_class->import( @{ $libraries{ $l } }, {
+ $library_class->import({
-into => scalar(caller),
-wrapper => $class,
- });
+ }, @{ $libraries{ $l } });
}
return 1;
}
L<MooseX::Types>
-=head1 AUTHOR AND COPYRIGHT
+=head1 AUTHOR
-Robert 'phaylon' Sedlacek C<E<lt>rs@474.atE<gt>>, with many thanks to
-the C<#moose> cabal on C<irc.perl.org>.
+See L<MooseX::Types/AUTHOR>.
=head1 LICENSE