blob: 7c2ea62f97568fd60a40788587ed34f2bc1513a3 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
package Bot::Games::OO;
use IM::Engine::Plugin::Commands::OO ();
use Moose::Exporter;
Moose::Exporter->build_import_methods(
install => [qw(import unimport)],
also => ['IM::Engine::Plugin::Commands::OO'],
);
sub init_meta {
my ($package, %options) = @_;
$options{base_class} = 'Bot::Games::Game'
if !exists $options{base_class}
&& $options{for_class} ne 'Bot::Games::Game';
IM::Engine::Plugin::Commands::OO->init_meta(%options);
# no init_meta is generated, since no metarole options were specified
return Class::MOP::class_of($options{for_class});
}
1;
|