New improved route finding algorithm
[spider.git] / cmd / show / newconfiguration.pl
index 516e448726f897c3c72efe44bedd8cb44e61811d..3093944266427f9be3d6d5dbe6bd2ebeef862f33 100644 (file)
@@ -9,13 +9,13 @@
 my ($self, $line) = @_;
 my @list = map { uc } split /\s+/, $line;           # list of callsigns of nodes
 my @out;
-my $nodes_only;
+my $nodes_only = 1;
 
-if (@list && $list[0] =~ /^NOD/) {
-       $nodes_only++;
+if (@list && $list[0] =~ /^USE/) {
+       $nodes_only = 0;
        shift @list;
 }
 
-push @out, $main::routeroot->config($nodes_only, 0, {}, @list);
+push @out, $main::routeroot->config($nodes_only, $self->width, 0, {}, @list);
 return (1, @out);