mirror of
https://github.com/perlbot/perlbuut
synced 2025-06-07 16:35:40 -04:00
24 lines
513 B
Perl
24 lines
513 B
Perl
package Bot::BB3::Plugin::Plugins;
|
|
use strict;
|
|
sub new {
|
|
my($class) = @_;
|
|
my $self = bless {}, $class;
|
|
$self->{"name"} = "plugins";
|
|
$self->{"opts"}->{"command"} = 1;
|
|
|
|
return $self;
|
|
}
|
|
|
|
sub command {
|
|
my($self, $said, $manager) = @_;
|
|
my $output = join(" ", sort map { $_->{name} } @{$manager->get_plugins});
|
|
|
|
#return( "handled", $output );
|
|
return( "handled", $output );
|
|
}
|
|
|
|
no warnings 'void';
|
|
"Bot::BB3::Plugin::Plugins";
|
|
|
|
__DATA__
|
|
Returns a list of all of the loaded plugins for this bot. Syntax, plugins
|