summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2009-10-31 02:54:22 -0500
committerJesse Luehrs <doy@tozt.net>2009-10-31 02:54:22 -0500
commit6a3e808ef1cbc34a586c88b56851223fa1bf4786 (patch)
tree247ebff2ae33420004c9c774d043bf07643df6a3
parent0260da349d165ae8b90c23a00359879b25c62334 (diff)
downloadim-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.pm4
-rw-r--r--lib/IM/Engine/Plugin/Commands/Command/Help.pm4
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) = @_;