From ab7ee6338e700147e61504526b5d51b6f78a5fb3 Mon Sep 17 00:00:00 2001
From: Al Beano <albino@autistici.org>
Date: Sun, 4 Sep 2016 11:31:33 +0100
Subject: [PATCH] experimental multichannel support

---
 MarkovBot.pl       | 10 +++++-----
 config.default.yml |  5 ++++-
 2 files changed, 9 insertions(+), 6 deletions(-)

diff --git a/MarkovBot.pl b/MarkovBot.pl
index e3c7fe6..7c384a9 100644
--- a/MarkovBot.pl
+++ b/MarkovBot.pl
@@ -46,7 +46,7 @@ sub said {
 
     if (defined $subs{$bare}) {
       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;
@@ -66,13 +66,13 @@ sub said {
       }
     }
     $self->say(
-      channel => config("irc_channel"),
+      channel => $msg->{"channel"},
       body => $ret,
     );
   }
   if ($msg->{body} =~ m/^ayy+$/) {
     $self->say(
-      channel => config("irc_channel"),
+      channel => $msg->{"channel"},
       body => "lmao",
     );
   }
@@ -100,7 +100,7 @@ sub said {
     }
 
     $self->say(
-      channel => config("irc_channel"),
+      channel => $msg->{"channel"},
       body => $resp,
     ) if $resp;
   }
@@ -121,7 +121,7 @@ MarkovBot->new(
 
   server => config("irc_server"),
   port => config("irc_port"),
-  channels => [config("irc_channel")],
+  channels => config("irc_channels"),
 
   nick => config("irc_nickname"),
   alt_nicks => [config("irc_nickname2")],
diff --git a/config.default.yml b/config.default.yml
index 27d874b..05162db 100644
--- a/config.default.yml
+++ b/config.default.yml
@@ -21,9 +21,12 @@ redis_password: hunter2
 irc_ssl: true
 irc_server: irc.foo.bar
 irc_port: 6697
-irc_channel: "#baz"
 irc_nickname: shithead-ng
 irc_nickname2: shithead
+irc_channels:
+  - "#foo"
+  - "#bar"
+  - "#baz"
 
 #
 # RNG to use