Ignore PRIVMSG's if they're from an invalid source.
This commit is contained in:
1 parent
35f58bf5b7
commit
ad799a32a2
2 files changed
+6
-2
No files matched your search
@@ -3,6 +3,7 @@ Auto IRC Bot 3.0: Change Log
|
|||||||
|
|
||||||
3.0 Indev
|
3.0 Indev
|
||||||
===============================================================================
|
===============================================================================
|
||||||
|
* Ignore PRIVMSG's if they're from an invalid source.
|
||||||
* Fixed an odd bug when viewing non-existent quotes.
|
* Fixed an odd bug when viewing non-existent quotes.
|
||||||
* You can now define how many results are returned by QDB SEARCH/MORE at a
|
* You can now define how many results are returned by QDB SEARCH/MORE at a
|
||||||
time with qdb_search_resnum in the config.
|
time with qdb_search_resnum in the config.
|
||||||
|
|||||||
+5
-2
@@ -530,9 +530,12 @@ sub part
|
|||||||
sub privmsg
|
sub privmsg
|
||||||
{
|
{
|
||||||
my ($svr, @ex) = @_;
|
my ($svr, @ex) = @_;
|
||||||
my %data = API::IRC::usrc(substr($ex[0], 1));
|
my %data = API::IRC::usrc(substr($ex[0], 1));
|
||||||
|
|
||||||
my @argv;
|
# Ensure this is coming from a user rather than a server.
|
||||||
|
if ($ex[0] !~ m/!/xsm) { return; }
|
||||||
|
|
||||||
|
my @argv;
|
||||||
for (my $i = 4; $i < scalar(@ex); $i++) {
|
for (my $i = 4; $i < scalar(@ex); $i++) {
|
||||||
push(@argv, $ex[$i]);
|
push(@argv, $ex[$i]);
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in new issue
Block a user