summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordoy <doy@tozt.net>2009-04-26 22:08:59 -0500
committerdoy <doy@tozt.net>2009-04-26 22:08:59 -0500
commit9c808599ef1ec7a1eb77ecb7fa85735dee71ef1a (patch)
tree83d3abc7bb1bdd024a33a4ca7c4155c307448ee8
parent42385a5a09bee71148e745ccbfe0a8d5286255f8 (diff)
downloadbot-games-9c808599ef1ec7a1eb77ecb7fa85735dee71ef1a.tar.gz
bot-games-9c808599ef1ec7a1eb77ecb7fa85735dee71ef1a.zip
allow setting any method metaclass attribute with the command syntax
-rw-r--r--lib/Bot/Games/OO/Game.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Bot/Games/OO/Game.pm b/lib/Bot/Games/OO/Game.pm
index b260477..9f19fb7 100644
--- a/lib/Bot/Games/OO/Game.pm
+++ b/lib/Bot/Games/OO/Game.pm
@@ -22,7 +22,7 @@ sub command {
);
$class->meta->add_method($name, $method_meta);
}
- for my $attr (Bot::Games::Trait::Method::Command->meta->get_attribute_list) {
+ for my $attr ($method_metaclass->get_attribute_list) {
$method_meta->$attr($args{$attr}) if exists $args{$attr};
}
}