From a4b0e0927ebcc4af3a11adb9db2e3d3eaee3e137 Mon Sep 17 00:00:00 2001
From: root <root@galanga.april.org>
Date: Tue, 20 Sep 2016 15:05:57 +0200
Subject: [PATCH] Update channel name

---
 galanga/nagios-irc-bot.pl | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/galanga/nagios-irc-bot.pl b/galanga/nagios-irc-bot.pl
index 32285ae..f8c87e5 100755
--- a/galanga/nagios-irc-bot.pl
+++ b/galanga/nagios-irc-bot.pl
@@ -78,7 +78,7 @@ sub on_connect {
     my $self = shift;
 
     $identified_to_nickserv = 1;
-    print "Joining #april-monitoring...\n";
+    print "Joining #april-admin...\n";
 
     # FIXME: this is broken right now.  when this is re-added, it has to happen
     # before we try to join channels.
@@ -86,7 +86,7 @@ sub on_connect {
     #$self->privmsg('nickserv',"identify xxx");
 
     # CONFIG: channels you want us to announce to ...
-    $self->join("#april-monitoring");
+    $self->join("#april-admin");
     #$self->join("#status");
 }
 
@@ -330,7 +330,7 @@ sub on_notice {
         print "Joining channels...\n";
 
         # CONFIG: channels that should be joined go here.
-        $self->join("#april-monitoring");
+        $self->join("#april-admin");
     }
 }
 
@@ -393,7 +393,7 @@ while (1) {
 
     if ($identified_to_nickserv) {
       # CONFIG: change where we announce stuff here
-      my @channels = ('#april-monitoring');
+      my @channels = ('#april-admin');
       while (defined (my $line = <NAGIOS>)) {
         print $line;
         chomp($line);