1package Moose::Exception::PackageDoesNotUseMooseExporter; 2our $VERSION = '2.2201'; 3 4use Moose; 5extends 'Moose::Exception'; 6 7has 'package' => ( 8 is => 'ro', 9 isa => 'Str', 10 required => 1 11); 12 13has 'is_loaded' => ( 14 is => 'ro', 15 isa => 'Bool', 16 required => 1 17); 18 19sub _build_message { 20 my $self = shift; 21 my $package = $self->package; 22 return "Package in also ($package) does not seem to " 23 . "use Moose::Exporter" 24 . ( $self->is_loaded ? "" : " (is it loaded?)" ); 25} 26 27__PACKAGE__->meta->make_immutable; 281; 29