From: minima <minima>
Date: Mon, 20 Jan 2003 17:08:16 +0000 (+0000)
Subject: show all the routes
X-Git-Tag: PRE-1-52~73
X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?p=spider.git;a=commitdiff_plain;h=3fb77aefcc75a7b465d94273adec2f14bfc8adb8

show all the routes
---

diff --git a/cmd/show/route.pl b/cmd/show/route.pl
index dda65bd9..4ebebde3 100644
--- a/cmd/show/route.pl
+++ b/cmd/show/route.pl
@@ -17,8 +17,7 @@ foreach $l (@list) {
 	my $ref = Route::get($l);
 	if ($ref) {
 		my $parents = $ref->isa('Route::Node') ? $l : join(',', $ref->parents);
-		my $dxchan = $ref->dxchan;
-		push @out, $self->msg('route', $l, $parents,  $dxchan->call);
+		push @out, $self->msg('route', $l, $parents,  join(',', map {$_->call} $ref->alldxchan));
 	} else {
 		push @out, $self->msg('e7', $l);
 	}