mirror of
https://github.com/pragma-/pbot.git
synced 2025-02-18 14:30:40 +01:00
Add subroutines to release and identify nick if necessary
This commit is contained in:
parent
60d8235999
commit
4696df7ea1
@ -244,6 +244,24 @@ sub on_departure {
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
sub on_notregistered {
|
||||||
|
my ($self, $conn, $event) = @_;
|
||||||
|
my ($addr, $msg) = $event->args;
|
||||||
|
|
||||||
|
$self->{pbot}->{logger}->log("Received NOTREGISTERED from $addr: $msg\n");
|
||||||
|
$conn->privmsg("nickserv", "release " . $self->{pbot}->{registry}->get_value('irc', 'botnick') . ' ' . $self->{pbot}->{registry}->get_value('irc', 'identify_password'));
|
||||||
|
$conn->privmsg("nickserv", "identify " . $self->{pbot}->{registry}->get_value('irc', 'botnick') . ' ' . $self->{pbot}->{registry}->get_value('irc', 'identify_password'));
|
||||||
|
}
|
||||||
|
|
||||||
|
sub on_bannickchange {
|
||||||
|
my ($self, $conn, $event) = @_;
|
||||||
|
my ($addr, $nick, $msg) = $event->args;
|
||||||
|
|
||||||
|
$self->{pbot}->{logger}->log("Received BANNICKCHANGE from $addr: $nick ($msg)\n");
|
||||||
|
$conn->privmsg("nickserv", "release " . $self->{pbot}->{registry}->get_value('irc', 'botnick') . ' ' . $self->{pbot}->{registry}->get_value('irc', 'identify_password'));
|
||||||
|
$conn->privmsg("nickserv", "identify " . $self->{pbot}->{registry}->get_value('irc', 'botnick') . ' ' . $self->{pbot}->{registry}->get_value('irc', 'identify_password'));
|
||||||
|
}
|
||||||
|
|
||||||
sub on_nickchange {
|
sub on_nickchange {
|
||||||
my ($self, $conn, $event) = @_;
|
my ($self, $conn, $event) = @_;
|
||||||
my ($nick, $user, $host, $newnick) = ($event->nick, $event->user, $event->host, $event->args);
|
my ($nick, $user, $host, $newnick) = ($event->nick, $event->user, $event->host, $event->args);
|
||||||
|
@ -13,7 +13,7 @@ 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 => 605,
|
BUILD_REVISION => 606,
|
||||||
BUILD_DATE => "2014-05-30",
|
BUILD_DATE => "2014-05-30",
|
||||||
};
|
};
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user