Added rchook_add() and rchook_del() to API::Std.
This commit is contained in:
1 parent
bbc3dfd966
commit
ccce5d5ef6
2 files changed
+29
-1
No files matched your search
@@ -3,6 +3,7 @@ Auto IRC Bot 3.0: Change Log
|
||||
|
||||
3.0 Indev
|
||||
==================================================================
|
||||
* Added rchook_add() and rchook_del() to API::Std.
|
||||
* Parse NOTICE and added hook on_notice.
|
||||
* Added hooks on_uprivmsg and on_cprivmsg.
|
||||
* Module names are now case sensitive.
|
||||
|
||||
+28
-1
@@ -10,7 +10,8 @@ use Exporter;
|
||||
|
||||
our (%LANGE, %MODULE, %EVENTS, %HOOKS, %CMDS);
|
||||
our @ISA = qw(Exporter);
|
||||
our @EXPORT_OK = qw(conf_get trans err awarn timer_add timer_del cmd_add cmd_del hook_add hook_del);
|
||||
our @EXPORT_OK = qw(conf_get trans err awarn timer_add timer_del cmd_add
|
||||
cmd_del hook_add hook_del rchook_add rchook_del);
|
||||
|
||||
|
||||
# Initialize a module.
|
||||
@@ -240,6 +241,32 @@ sub timer_del
|
||||
return 0;
|
||||
}
|
||||
|
||||
# Hook onto a raw command.
|
||||
sub rchook_add
|
||||
{
|
||||
my ($cmd, $sub) = @_;
|
||||
$cmd = uc($cmd);
|
||||
|
||||
return 0 if defined $Parser::IRC::RAWC{$cmd};
|
||||
|
||||
$Parser::IRC::RAWC{$cmd} = $sub;
|
||||
|
||||
return 1;
|
||||
}
|
||||
|
||||
# Delete a raw command hook.
|
||||
sub rchook_del
|
||||
{
|
||||
my ($cmd) = @_;
|
||||
$cmd = uc($cmd);
|
||||
|
||||
return 0 if !defined $Parser::IRC::RAWC{$cmd};
|
||||
|
||||
delete $Parser::IRC::RAWC{$cmd};
|
||||
|
||||
return 1;
|
||||
}
|
||||
|
||||
# Configuration value getter.
|
||||
sub conf_get
|
||||
{
|
||||
|
||||
Reference in new issue
Block a user