Update to new database structure

[NDIRC.git] / ndawn.pl

diff --git a/ndawn.pl b/ndawn.pl
index 79165bd1b1cfb4c330a74aeac82e904fc55cdf0d..0de8351ac4e80a5ab9a6dd7293f8657582724142 100644 (file)
--- a/ndawn.pl
+++ b/ndawn.pl
@@ -55,10 +55,12 @@ my $TICK = $DBH->selectrow_array('SELECT tick()');
 
 my $disp = new NDIRC::Dispatcher;
 
-$disp->load('Basic','PA','Channel','Scans','Quotes','Members','Usermgm');
+$disp->load(qw/Basic SMS Channel Def Intel Members PA Quotes Scans Usermgm/);
 
 $ND::scanchan = '#testarmer';
-$disp->add_channel('#testarlite', ['pub','help','channel']);
+$ND::defchan = '#testarlite';
+$ND::memchan = '#testarmer';
+$disp->add_channel($ND::defchan, ['pub','help','channel','def']);
 $disp->add_channel($ND::scanchan, ['pub','help','channel','scan','member']);
 $disp->add_channel('pm', ['pub','help','pm']);