blob: c05cf7761c389d5c4e9ab4d87ec9f65ee7a4d5b8 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
package Bot::Games::OO;
use IM::Engine::Plugin::Commands::OO ();
use Moose::Exporter;
my ($import, $unimport, $init_meta) = 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);
goto $init_meta;
}
1;
|
