mirror of
https://github.com/pragma-/pbot.git
synced 2024-12-27 13:12:42 +01:00
admin commands: added sl command to send raw commands to IRC server
This commit is contained in:
parent
f76dcacca7
commit
1f4b6bba50
@ -44,6 +44,15 @@ sub initialize {
|
||||
$pbot->commands->register(sub { return $self->adminrem(@_) }, "adminrem", 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->sl(@_) }, "sl", 60);
|
||||
}
|
||||
|
||||
sub sl {
|
||||
my $self = shift;
|
||||
my ($from, $nick, $user, $host, $arguments) = @_;
|
||||
|
||||
$self->{pbot}->conn->sl($arguments);
|
||||
return "Sent.\n";
|
||||
}
|
||||
|
||||
sub login {
|
||||
|
@ -13,8 +13,8 @@ use warnings;
|
||||
# These are set automatically by the build/commit script
|
||||
use constant {
|
||||
BUILD_NAME => "PBot",
|
||||
BUILD_REVISION => 306,
|
||||
BUILD_DATE => "2011-02-09",
|
||||
BUILD_REVISION => 307,
|
||||
BUILD_DATE => "2011-02-10",
|
||||
};
|
||||
|
||||
1;
|
||||
|
Loading…
Reference in New Issue
Block a user