Added API::IRC::msg and API::IRC::notice

This commit is contained in:
Matthew Barksdale committed 2011-01-20 02:05:50 -05:00
1 parent eb5abbbd5c
commit 79d464c247
2 files changed
+16 -2

No files matched your search

+1 -1
View File
@@ -3,7 +3,7 @@ Auto IRC Bot 3.0: Change Log
3.0 Indev
==================================================================
* Added mode subroutine to API::IRC.
* Added mode, msg, and notice subroutine to API::IRC.
* Added PASS support.
* Bug fix: err() fatal errors now work. They didn't work
due to bad regex.
+15 -1
View File
@@ -9,7 +9,7 @@ use warnings;
use Exporter;
our @ISA = qw(Exporter);
our @EXPORT_OK = qw(cjoin cpart mode);
our @EXPORT_OK = qw(cjoin cpart mode msg notice);
# Join a channel.
@@ -37,3 +37,17 @@ sub mode {
Auto::socksnd($svr, "MODE $chan $modes");
}
# Send a PRIVMSG
sub msg {
my ($svr, $target, $message) = @_;
Auto::socksnd($svr, "PRIVMSG $target :$message");
}
# Send a NOTICE
sub notice {
my ($svr, $target, $message) = @_;
Auto::socksnd($svr, "NOTICE $target :$message");
}