X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FRoute.pm;h=290cd7628f10823e61611398bf48a8b95de9ba2c;hb=ab1e2dae047ba2c778551638a0a90201b14658b2;hp=51fceff5928a7b58b8232cb60043b8a904ce2f47;hpb=ac14c6983861c08b8a2842af46e67407600f8065;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');