changed sh/config to show no of users if known
authordjk <djk>
Mon, 18 Jan 1999 20:06:54 +0000 (20:06 +0000)
committerdjk <djk>
Mon, 18 Jan 1999 20:06:54 +0000 (20:06 +0000)
cmd/show/configuration.pl

index a7a1773b1391acc722d53d8d4be5217c04a01cee..f2f296e585ec7288685df9c94e958ddcccfca4cb 100644 (file)
@@ -53,6 +53,9 @@ if ($list[0] && $list[0] =~ /^NOD/) {
                @val = values %{$nlist};
 
                my $i = 0;
+               if (@val == 0 && $node->users) {
+                       push @l, sprintf "(%d users)", $node->users;
+               }
                foreach $call (@val) {
                        if ($i >= 5) {
                                push @out, sprintf "%-12s %-12s %-12s %-12s %-12s %-12s", @l;