GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2025-02-18 14:30:40 +01:00
Code Issues Projects Releases Wiki Activity

admin commands: added sl command to send raw commands to IRC server

Browse Source
This commit is contained in:
Pragmatic Software 2011-02-10 08:40:14 +00:00
parent f76dcacca7
commit 1f4b6bba50
2 changed files with 11 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
PBot/BotAdminCommands.pm
View File

@ -44,6 +44,15 @@ sub initialize {
$pbot->commands->register(sub { return $self->adminrem(@_) }, "adminrem", 60); $pbot->commands->register(sub { return $self->adminrem(@_) }, "adminrem", 60);
$pbot->commands->register(sub { return $self->adminset(@_) }, "adminset", 60); $pbot->commands->register(sub { return $self->adminset(@_) }, "adminset", 60);
$pbot->commands->register(sub { return $self->adminunset(@_) }, "adminunset", 60); $pbot->commands->register(sub { return $self->adminunset(@_) }, "adminunset", 60);
$pbot->commands->register(sub { return $self->sl(@_) }, "sl", 60);
}
sub sl {
my $self = shift;
my ($from, $nick, $user, $host, $arguments) = @_;
$self->{pbot}->conn->sl($arguments);
return "Sent.\n";
} }
sub login { sub login {

4
PBot/VERSION.pm
View File

@ -13,8 +13,8 @@ use warnings;
# These are set automatically by the build/commit script # These are set automatically by the build/commit script
use constant { use constant {
BUILD_NAME => "PBot", BUILD_NAME => "PBot",
BUILD_REVISION => 306, BUILD_REVISION => 307,
BUILD_DATE => "2011-02-09", BUILD_DATE => "2011-02-10",
}; };
1; 1;