added shellregex

[spider.git] / cmd / show / users.pl

diff --git a/cmd/show/users.pl b/cmd/show/users.pl
index 8cbe85770967388f43a8895c590f629f2930345b..55a34bec954be8beab2c6c76eaf6920d8b0f961f 100644 (file)
--- a/cmd/show/users.pl
+++ b/cmd/show/users.pl
@@ -16,7 +16,7 @@ my $call;
 my $i = 0;
 my @l;
 my $nlist = $node->list;
-my @val = values %{$nlist};
+my @val = sort {$a->call cmp $b->call} values %{$nlist};
 foreach $call (@val) {
   if (@list) {
     next if !grep $call->call eq $_, @list;