if($class ne __PACKAGE__){
$self->meta->_initialize_object($self, \%args);
}
-
return $self;
}
return;
}
-
-# Moose uses Application::ToInstance, Application::ToClass, Application::ToRole
sub apply {
my $self = shift;
my $consumer = shift;
return Mouse::Meta::Role::Application->new(@_)->apply($self, $consumer);
}
-
sub combine {
my($self, @role_specs) = @_;
Mouse::Meta::Role::Application - The Mouse role application class
+=head1 VERSION
+
+This document describes Mouse version 0.70
+
=head1 SEE ALSO
L<Moose::Role::Application>
L<Moose::Role::Application::ToInstance>
+=cut
+