summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordoy <doy@tozt.net>2009-01-14 22:03:55 -0500
committerdoy <doy@tozt.net>2009-01-14 22:03:55 -0500
commit564c535f9022b72dc0fed42ef1efc47a57d26f81 (patch)
tree1c1b0a79f589d1067d34fe5c61dd8bfeaf4bf287
parentc72f3aeddaf47f63807d65dedbfdc6003d73b5cc (diff)
downloadbot-games-564c535f9022b72dc0fed42ef1efc47a57d26f81.tar.gz
bot-games-564c535f9022b72dc0fed42ef1efc47a57d26f81.zip
make the command metaclass into a role
-rw-r--r--lib/Bot/Games/Meta/Method/Command.pm7
-rw-r--r--lib/Bot/Games/Meta/Role/Command.pm14
2 files changed, 14 insertions, 7 deletions
diff --git a/lib/Bot/Games/Meta/Method/Command.pm b/lib/Bot/Games/Meta/Method/Command.pm
deleted file mode 100644
index 60742fa..0000000
--- a/lib/Bot/Games/Meta/Method/Command.pm
+++ /dev/null
@@ -1,7 +0,0 @@
-#!/usr/bin/perl
-package Bot::Games::Meta::Method::Command;
-use Moose;
-extends 'Moose::Meta::Method';
-
-
-1;
diff --git a/lib/Bot/Games/Meta/Role/Command.pm b/lib/Bot/Games/Meta/Role/Command.pm
new file mode 100644
index 0000000..0143d0c
--- /dev/null
+++ b/lib/Bot/Games/Meta/Role/Command.pm
@@ -0,0 +1,14 @@
+#!/usr/bin/perl
+package Bot::Games::Meta::Role::Command;
+use Moose::Role;
+
+has pass_args => (
+ is => 'rw',
+ isa => 'Bool',
+ default => 1,
+);
+
+__PACKAGE__->meta->make_immutable;
+no Moose::Role;
+
+1;