projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add better new user logging in PC92/PC19
[spider.git]
/
cmd
/
show
/
newconfiguration.pl
diff --git
a/cmd/show/newconfiguration.pl
b/cmd/show/newconfiguration.pl
index 6675619131b4eba8aef767c0d5b253110a533538..3093944266427f9be3d6d5dbe6bd2ebeef862f33 100644
(file)
--- a/
cmd/show/newconfiguration.pl
+++ b/
cmd/show/newconfiguration.pl
@@
-3,19
+3,19
@@
#
# Copyright (c) 2001 Dirk Koopman G1TLH
#
#
# Copyright (c) 2001 Dirk Koopman G1TLH
#
-#
$Id$
+#
#
my ($self, $line) = @_;
my @list = map { uc } split /\s+/, $line; # list of callsigns of nodes
my @out;
#
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;
}
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);
return (1, @out);