Merge branch 'newpc92timings' of /scm/spider into newpc92timings

[spider.git] / cmd / who.pl

diff --git a/cmd/who.pl b/cmd/who.pl
index 66f937e64541f08ad2e515e3bc9f026b0038b43c..b068c586aa38a381d930c04253d665966763c687 100644 (file)
--- a/cmd/who.pl
+++ b/cmd/who.pl
@@ -4,7 +4,7 @@
 #\r
 # Copyright (c) 1999 Dirk Koopman G1TLH\r
 #\r
-# $Id$\r
+#\r
 \r
 \r
 my $self = shift;\r
@@ -19,6 +19,7 @@ foreach $dxchan ( sort {$a->call cmp $b->call} DXChannel::get_all ) {
        my $type = $dxchan->is_node ? "NODE" : "USER";\r
        my $sort = "    ";\r
        if ($dxchan->is_node) {\r
+               $sort = 'ANEA' if $dxchan->is_aranea;\r
                $sort = "DXSP" if $dxchan->is_spider;\r
                $sort = "CLX " if $dxchan->is_clx;\r
                $sort = "DXNT" if $dxchan->is_dxnet;\r