diff options
author | doy <doy@tozt.net> | 2009-04-26 22:08:59 -0500 |
---|---|---|
committer | doy <doy@tozt.net> | 2009-04-26 22:08:59 -0500 |
commit | 9c808599ef1ec7a1eb77ecb7fa85735dee71ef1a (patch) | |
tree | 83d3abc7bb1bdd024a33a4ca7c4155c307448ee8 | |
parent | 42385a5a09bee71148e745ccbfe0a8d5286255f8 (diff) | |
download | bot-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.pm | 2 |
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}; } } |