Made Auto respond properly to PRIVMSGs received before connection.
This commit is contained in:
1 parent
9b9997a24d
commit
25a0ec8081
2 files changed
+10
-2
No files matched your search
@@ -3,6 +3,7 @@ Auto IRC Bot 3.0: Change Log
|
|||||||
|
|
||||||
3.0 Indev
|
3.0 Indev
|
||||||
===============================================================================
|
===============================================================================
|
||||||
|
* Made Auto respond properly to PRIVMSGs received before connection.
|
||||||
* Fixed an exploit in QDB that allowed users to use services fantasy
|
* Fixed an exploit in QDB that allowed users to use services fantasy
|
||||||
commands with the bot's account.
|
commands with the bot's account.
|
||||||
* Heavily improved ./install.
|
* Heavily improved ./install.
|
||||||
|
|||||||
+9
-2
@@ -631,10 +631,17 @@ sub part {
|
|||||||
# Parse: PRIVMSG
|
# Parse: PRIVMSG
|
||||||
sub privmsg {
|
sub privmsg {
|
||||||
my ($svr, @ex) = @_;
|
my ($svr, @ex) = @_;
|
||||||
my %data = API::IRC::usrc(substr($ex[0], 1));
|
my %data;
|
||||||
|
|
||||||
# Ensure this is coming from a user rather than a server.
|
# Ensure this is coming from a user rather than a server.
|
||||||
if ($ex[0] !~ m/!/xsm) { return; }
|
if ($ex[0] !~ m/!/xsm) {
|
||||||
|
%data = (
|
||||||
|
'nick' => substr($ex[0], 1),
|
||||||
|
'user' => '*',
|
||||||
|
'host' => '*'
|
||||||
|
);
|
||||||
|
}
|
||||||
|
else { %data = API::IRC::usrc(substr($ex[0], 1)) }
|
||||||
|
|
||||||
my @argv;
|
my @argv;
|
||||||
for (my $i = 4; $i < scalar(@ex); $i++) {
|
for (my $i = 4; $i < scalar(@ex); $i++) {
|
||||||
|
|||||||
Reference in new issue
Block a user