X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FRoute.pm;h=290cd7628f10823e61611398bf48a8b95de9ba2c;hb=fb9c2ab04977b4e685b0eca3b2a2d04a77f65f4b;hp=51fceff5928a7b58b8232cb60043b8a904ce2f47;hpb=0ae2756b512f3783efe7f7e3c124b0a074227e81;p=spider.git

diff --git a/perl/Route.pm b/perl/Route.pm
index 51fceff5..290cd762 100644
--- a/perl/Route.pm
+++ b/perl/Route.pm
@@ -305,6 +305,7 @@ sub findroutes
 
 	# deal with more nodes
 	my $nref = Route::get($call);
+	return () unless $nref;
 	foreach my $ncall (@{$nref->{parent}}) {
 		unless ($seen->{$ncall}) {
 			dbg("recursing from $call -> $ncall") if isdbg('routec');