diff --git a/PBot/IRCHandlers.pm b/PBot/IRCHandlers.pm index 167498a6..2cb73e3e 100644 --- a/PBot/IRCHandlers.pm +++ b/PBot/IRCHandlers.pm @@ -249,6 +249,7 @@ sub on_notregistered { my ($addr, $msg) = $event->args; $self->{pbot}->{logger}->log("Received NOTREGISTERED from $addr: $msg\n"); + $conn->privmsg("nickserv", "ghost " . $self->{pbot}->{registry}->get_value('irc', 'botnick') . ' ' . $self->{pbot}->{registry}->get_value('irc', 'identify_password')); $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')); } @@ -258,6 +259,7 @@ sub on_bannickchange { my ($addr, $nick, $msg) = $event->args; $self->{pbot}->{logger}->log("Received BANNICKCHANGE from $addr: $nick ($msg)\n"); + $conn->privmsg("nickserv", "ghost " . $self->{pbot}->{registry}->get_value('irc', 'botnick') . ' ' . $self->{pbot}->{registry}->get_value('irc', 'identify_password')); $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')); } diff --git a/PBot/VERSION.pm b/PBot/VERSION.pm index 29a19bd1..665c72c8 100644 --- a/PBot/VERSION.pm +++ b/PBot/VERSION.pm @@ -13,7 +13,7 @@ use warnings; # These are set automatically by the build/commit script use constant { BUILD_NAME => "PBot", - BUILD_REVISION => 613, + BUILD_REVISION => 614, BUILD_DATE => "2014-06-01", };