X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Fnewconfiguration.pl;h=f1f226eabef0c0fa4a87135cf79246a34460f56a;hb=26cab5eb43ff7295e88d2129d8d8d5c1fe37a10a;hp=a2599b88d69ebc0a53eb56dc10d6fd96d3d2c7ad;hpb=b67b50de92dbf61ce939b42f7c74e30dc58eba41;p=spider.git diff --git a/cmd/show/newconfiguration.pl b/cmd/show/newconfiguration.pl index a2599b88..f1f226ea 100644 --- a/cmd/show/newconfiguration.pl +++ b/cmd/show/newconfiguration.pl @@ -16,6 +16,13 @@ if (@list && $list[0] =~ /^NOD/) { shift @list; } -push @out, $main::routeroot->config($nodes_only, 0, @list); +# root node +push @out, $main::mycall; + +# now show the config in terms of each of the root nodes view +foreach my $n ($main::routeroot->links) { + my $r = Route::Node::get($n); + push @out, $r->config($nodes_only, 1, [], @list) if $r; +} return (1, @out);