experimental multichannel support
This commit is contained in:
parent
64a14dae03
commit
ab7ee6338e
10
MarkovBot.pl
10
MarkovBot.pl
|
@ -46,7 +46,7 @@ sub said {
|
||||||
|
|
||||||
if (defined $subs{$bare}) {
|
if (defined $subs{$bare}) {
|
||||||
my $ret = $subs{$bare}->(\@command);
|
my $ret = $subs{$bare}->(\@command);
|
||||||
$self->say( channel => config("irc_channel"), body => decode("UTF-8", $ret) ) unless $ret eq "___null___";
|
$self->say( channel => $msg->{"channel"}, body => decode("UTF-8", $ret) ) unless $ret eq "___null___";
|
||||||
}
|
}
|
||||||
|
|
||||||
return;
|
return;
|
||||||
|
@ -66,13 +66,13 @@ sub said {
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
$self->say(
|
$self->say(
|
||||||
channel => config("irc_channel"),
|
channel => $msg->{"channel"},
|
||||||
body => $ret,
|
body => $ret,
|
||||||
);
|
);
|
||||||
}
|
}
|
||||||
if ($msg->{body} =~ m/^ayy+$/) {
|
if ($msg->{body} =~ m/^ayy+$/) {
|
||||||
$self->say(
|
$self->say(
|
||||||
channel => config("irc_channel"),
|
channel => $msg->{"channel"},
|
||||||
body => "lmao",
|
body => "lmao",
|
||||||
);
|
);
|
||||||
}
|
}
|
||||||
|
@ -100,7 +100,7 @@ sub said {
|
||||||
}
|
}
|
||||||
|
|
||||||
$self->say(
|
$self->say(
|
||||||
channel => config("irc_channel"),
|
channel => $msg->{"channel"},
|
||||||
body => $resp,
|
body => $resp,
|
||||||
) if $resp;
|
) if $resp;
|
||||||
}
|
}
|
||||||
|
@ -121,7 +121,7 @@ MarkovBot->new(
|
||||||
|
|
||||||
server => config("irc_server"),
|
server => config("irc_server"),
|
||||||
port => config("irc_port"),
|
port => config("irc_port"),
|
||||||
channels => [config("irc_channel")],
|
channels => config("irc_channels"),
|
||||||
|
|
||||||
nick => config("irc_nickname"),
|
nick => config("irc_nickname"),
|
||||||
alt_nicks => [config("irc_nickname2")],
|
alt_nicks => [config("irc_nickname2")],
|
||||||
|
|
|
@ -21,9 +21,12 @@ redis_password: hunter2
|
||||||
irc_ssl: true
|
irc_ssl: true
|
||||||
irc_server: irc.foo.bar
|
irc_server: irc.foo.bar
|
||||||
irc_port: 6697
|
irc_port: 6697
|
||||||
irc_channel: "#baz"
|
|
||||||
irc_nickname: shithead-ng
|
irc_nickname: shithead-ng
|
||||||
irc_nickname2: shithead
|
irc_nickname2: shithead
|
||||||
|
irc_channels:
|
||||||
|
- "#foo"
|
||||||
|
- "#bar"
|
||||||
|
- "#baz"
|
||||||
|
|
||||||
#
|
#
|
||||||
# RNG to use
|
# RNG to use
|
||||||
|
|
Loading…
Reference in New Issue