X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=6d4dc90f66b2fc523a8d735069f231642d253341;hb=25140d3e8633cbf9e25b6528248405ec8ed125e3;hp=e786edb6f9ec7c598b5af67f3b13d1e2d926f117;hpb=bcf2892aa7f3c9957ee61365a6e032dd93044834;p=spider.git

diff --git a/perl/cluster.pl b/perl/cluster.pl
index e786edb6..6d4dc90f 100755
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -336,7 +336,7 @@ sub process_inqueue
 		return unless defined $sort;
 	
 		# do the really sexy console interface bit! (Who is going to do the TK interface then?)
-		dbg("<- $sort $call $line\n") if $sort ne 'D' && isdbg('chan');
+		dbg("<- $sort $call $line") if $sort ne 'D' && isdbg('chan');
 		if ($self->{disconnecting}) {
 			dbg('In disconnection, ignored');
 			next;
@@ -523,7 +523,7 @@ DXDb::load();
 
 # starting local stuff
 dbg("doing local initialisation ...");
-QSL::init(1) or die "Cannot open local QSL database";
+QSL::init(1);
 eval {
 	Local::init();
 };