have Bot::Games::OO set the base class

1 files changed, 12 insertions, 2 deletions

diff --git a/lib/Bot/Games/OO.pm b/lib/Bot/Games/OO.pm
index 0131a1a..c05cf77 100644
--- a/lib/Bot/Games/OO.pm
+++ b/lib/Bot/Games/OO.pm
@@ -2,8 +2,18 @@ package Bot::Games::OO;
 use IM::Engine::Plugin::Commands::OO ();
 use Moose::Exporter;
 
-Moose::Exporter->setup_import_methods(
-    also => ['IM::Engine::Plugin::Commands::OO'],
+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;