on_notice now sends the proper arguments.
This commit is contained in:
1 parent
6e61841e20
commit
bad3169336
2 files changed
+10
-1
No files matched your search
@@ -3,6 +3,7 @@ Auto IRC Bot 3.0: Change Log
|
|||||||
|
|
||||||
3.0 Indev
|
3.0 Indev
|
||||||
===============================================================================
|
===============================================================================
|
||||||
|
* Changed on_notice arguments to: \%src, $target, @msg
|
||||||
* Clean up shutdown.
|
* Clean up shutdown.
|
||||||
* Created event on_shutdown.
|
* Created event on_shutdown.
|
||||||
* Shutdown if there are no more IRC connections.
|
* Shutdown if there are no more IRC connections.
|
||||||
|
|||||||
+9
-1
@@ -481,7 +481,15 @@ sub notice
|
|||||||
{
|
{
|
||||||
my ($svr, @ex) = @_;
|
my ($svr, @ex) = @_;
|
||||||
|
|
||||||
API::Std::event_run("on_notice", ($svr, @ex));
|
# Prepare all the data.
|
||||||
|
my %src = API::IRC::usrc(substr $ex[0], 1);
|
||||||
|
my $target = $ex[2];
|
||||||
|
shift @ex; shift @ex; shift @ex;
|
||||||
|
$ex[0] = substr $ex[0], 1;
|
||||||
|
$src{svr} = $svr;
|
||||||
|
|
||||||
|
# Send it off.
|
||||||
|
API::Std::event_run("on_notice", (\%src, $target, @ex));
|
||||||
|
|
||||||
return 1;
|
return 1;
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in new issue
Block a user