fix rent2pwn's shit
This commit is contained in:
parent
3a82a36a7c
commit
58e1f66319
|
@ -47,7 +47,7 @@ sub said {
|
||||||
|
|
||||||
}
|
}
|
||||||
if ($msg->{body} eq 'wew') {
|
if ($msg->{body} eq 'wew') {
|
||||||
$self->say(channel => $irc_chan, body => "lad");
|
$self->say(channel => config("irc_channel"), body => "lad");
|
||||||
}
|
}
|
||||||
my $chattiness = $redis->get("$redis_prefix:chattiness");
|
my $chattiness = $redis->get("$redis_prefix:chattiness");
|
||||||
if (rand 100 < $chattiness) {
|
if (rand 100 < $chattiness) {
|
||||||
|
|
Loading…
Reference in New Issue