diff options
author | Jesse Luehrs <doy@tozt.net> | 2009-10-31 02:54:22 -0500 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2009-10-31 02:54:22 -0500 |
commit | 6a3e808ef1cbc34a586c88b56851223fa1bf4786 (patch) | |
tree | 247ebff2ae33420004c9c774d043bf07643df6a3 | |
parent | 0260da349d165ae8b90c23a00359879b25c62334 (diff) | |
download | im-engine-plugin-commands-6a3e808ef1cbc34a586c88b56851223fa1bf4786.tar.gz im-engine-plugin-commands-6a3e808ef1cbc34a586c88b56851223fa1bf4786.zip |
add help text for cmdlist and help
-rw-r--r-- | lib/IM/Engine/Plugin/Commands/Command/Cmdlist.pm | 4 | ||||
-rw-r--r-- | lib/IM/Engine/Plugin/Commands/Command/Help.pm | 4 |
2 files changed, 8 insertions, 0 deletions
diff --git a/lib/IM/Engine/Plugin/Commands/Command/Cmdlist.pm b/lib/IM/Engine/Plugin/Commands/Command/Cmdlist.pm index 6d9444a..564e2c4 100644 --- a/lib/IM/Engine/Plugin/Commands/Command/Cmdlist.pm +++ b/lib/IM/Engine/Plugin/Commands/Command/Cmdlist.pm @@ -1,6 +1,10 @@ package IM::Engine::Plugin::Commands::Command::Cmdlist; use IM::Engine::Plugin::Commands::OO; +has '+help' => ( + default => 'Displays a list of commands available to the bot', +); + sub init { my $self = shift; $self->is_active(0); diff --git a/lib/IM/Engine/Plugin/Commands/Command/Help.pm b/lib/IM/Engine/Plugin/Commands/Command/Help.pm index b28472a..f400157 100644 --- a/lib/IM/Engine/Plugin/Commands/Command/Help.pm +++ b/lib/IM/Engine/Plugin/Commands/Command/Help.pm @@ -1,6 +1,10 @@ package IM::Engine::Plugin::Commands::Command::Help; use IM::Engine::Plugin::Commands::OO; +has '+help' => ( + default => 'Displays the help text for the given command', +); + sub default { my $self = shift; my ($sender, $action) = @_; |