X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FRoute.pm;fp=perl%2FRoute.pm;h=3f940426f4068ffb1e7242de41765eff645b5125;hb=cc24321cfb0cd5bcb0516ba5587dcf84fed2725e;hp=f406a98a619bf2460abb532a97d088b8320b1d0d;hpb=a96a085a91927bf6fda88718092cc279e10ba7ce;p=spider.git

diff --git a/perl/Route.pm b/perl/Route.pm
index f406a98a..3f940426 100644
--- a/perl/Route.pm
+++ b/perl/Route.pm
@@ -243,7 +243,7 @@ sub alldxchan
 	my @dxchan = @_;
 	foreach my $p (@{$self->{parent}}) {
 		my $ref = $self->get($p);
-		push @dxchan, $ref->alldxchan(@dxchan);
+		push @dxchan, $ref->alldxchan(@dxchan) if $ref;
 	}
 	return @dxchan;
 }