aboutsummaryrefslogtreecommitdiff
path: root/saxrobot
diff options
context:
space:
mode:
authorDavid Phillips <david@sighup.nz>2017-03-09 12:42:58 +1300
committerDavid Phillips <david@sighup.nz>2017-03-09 12:42:58 +1300
commit3b19802f18f8b5d48f89768743cfbe854fc9df4f (patch)
treedf18992e7f7ffa7ee0c2f7c4ee5c34dab52933c9 /saxrobot
parente99c752927ba2e151ec887ea2e82e80d54ccea8c (diff)
parent9bb8010141516ad438d8fd5ec41be77dc78395c1 (diff)
downloadidalius-3b19802f18f8b5d48f89768743cfbe854fc9df4f.tar.xz
Merge branch 'tidy'
Diffstat (limited to 'saxrobot')
-rwxr-xr-xsaxrobot4
1 files changed, 1 insertions, 3 deletions
diff --git a/saxrobot b/saxrobot
index a90eb3c..c4dc728 100755
--- a/saxrobot
+++ b/saxrobot
@@ -31,8 +31,6 @@ POE::Session->create(
heap => { irc => $irc },
);
-our $hold_op = {};
-
$poe_kernel->run();
sub _start {
@@ -83,7 +81,7 @@ sub irc_public {
}
sub irc_msg {
- my ($who, $to, $what, $ided) = @_[ARG0, ARG1, ARG2, ARG3];
+ my ($who, $to, $what, $ided) = @_[ARG0 .. ARG3];
my $nick = (split /!/, $who)[0];
if ($config{must_id} && $ided != 1) {
$irc->yield(privmsg => $nick => "You must identify with services");