X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=ndawn.pl;h=76fca28c3d6899574ffaeecae66831cee0004f25;hb=491db8f0abea3c779a1ecdc64f22ed233bc9546b;hp=744aef4a17ca8519c2b44833c560b47831f679c3;hpb=7091b004eee879d36792d6da3b8fd4fb1b5f71bf;p=NDIRC.git

diff --git a/ndawn.pl b/ndawn.pl
index 744aef4..76fca28 100644
--- a/ndawn.pl
+++ b/ndawn.pl
@@ -55,26 +55,33 @@ my $TICK = $DBH->selectrow_array('SELECT tick()');
 
 my $disp = new NDIRC::Dispatcher;
 
-$disp->load('Basic','PA','Channel');
+$disp->load('Basic','PA','Channel','Scans');
 
+$ND::scanchan = '#testarmer';
 $disp->add_channel('#testarlite', ['pub','help','channel']);
-$disp->add_channel('#testarmer', ['pub','help','channel']);
+$disp->add_channel('#testarmer', ['pub','help','channel','scan']);
 $disp->add_channel('pm', ['pub','help','pm']);
 
 sub event_pubmsg {
 	my ($server, $msg, $nick, $address, $channel) = @_;
 
-	if (parseCommand($msg,$server,$nick,$address,$channel,$disp,DB())){
-		#Command parsed and run successfully
-	}
+	eval {
+		if (parseCommand($msg,$server,$nick,$address,$channel,$disp,DB())){
+			#Command parsed and run successfully
+		}
+	};
+	print $@ if $@;
 }
 
 sub event_privmsg {
 	my ($server, $msg, $nick, $address) = @_;
 
-	if (parseCommand($msg,$server,$nick,$address,'pm',$disp,DB())){
-		#Command parsed and run successfully
-	}
+	eval {
+		if (parseCommand($msg,$server,$nick,$address,'pm',$disp,DB())){
+			#Command parsed and run successfully
+		}
+	};
+	print $@ if $@;
 }
 
 sub refresh {