X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=b8b17ae612065b2080eb8c44f7c34cc20120c81c;hb=1cc51a6696899a05d1b9ca40dab497cfdc39294b;hp=30fd979073680473a33fa010e893ba7dee337a60;hpb=a79ed63d7b2c53c1f360512afa2a68ba311b9554;p=spider.git

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 30fd9790..b8b17ae6 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -275,7 +275,7 @@ sub start
 	$self->tell_login('loginn');
 
 	# run a script send the output to the debug file
-	my $script = new Script(lc $call);
+	my $script = new Script(lc $call) || new Script('node_default');
 	$script->run($self) if $script;
 }