From 917638dfdf31e26ae9115dabb5c2fe528866c549 Mon Sep 17 00:00:00 2001
From: William Heimbigner <william.heimbigner@gmail.com>
Date: Mon, 8 Oct 2007 13:28:23 +0000
Subject: added a db command, improved the user set flags command, added linked
 channels, added a showhilights command, eliminated flooding of alerts, fixed
 nickspam check, added something to watch chancounts.

---
 modules/xml.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'modules/xml.pl')

diff --git a/modules/xml.pl b/modules/xml.pl
index c3da924..1978af9 100644
--- a/modules/xml.pl
+++ b/modules/xml.pl
@@ -11,8 +11,9 @@ sub readXML {
   my ( $p ) = $::cset; #@_;
   $p = 'default' if $p eq '';
   $p = "config-$p";
+  my @fchan = ( 'event', keys %::RISKS );
   $::settings = $::xs1->XMLin( "$p/settings.xml", ForceArray => ['host'], 'GroupTags' => { altnicks => 'altnick', server => 'host', autojoins => 'autojoin' });
-  $::channels = $::xs1->XMLin( "$p/channels.xml", ForceArray => [qw/event debug info low medium high/]);
+  $::channels = $::xs1->XMLin( "$p/channels.xml", ForceArray => \@fchan );
   $::users    = $::xs1->XMLin( "$p/users.xml",    ForceArray => 'person');
   $::commands = $::xs1->XMLin( "$p/commands.xml", ForceArray => [qw/command/]);
   $::mysql    = $::xs1->XMLin( "$p/mysql.xml",    ForceArray => []);
-- 
cgit v1.2.3