From b66a2d39afb647bfcde9a7bd43eaea5f5b8e39c2 Mon Sep 17 00:00:00 2001 From: minima Date: Tue, 15 Feb 2005 13:25:03 +0000 Subject: [PATCH] change links --- cmd/links.pl | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/cmd/links.pl b/cmd/links.pl index 17c12ff1..68e2d044 100644 --- a/cmd/links.pl +++ b/cmd/links.pl @@ -18,7 +18,8 @@ my $nowt = time; push @out, " Ave Obs Ping Sec Since"; push @out, " Callsign Type Started RTT count Int. Last Ping"; -foreach $dxchan ( sort {$a->call cmp $b->call} DXChannel::get_all_nodes ) { +foreach $dxchan ( sort {$a->call cmp $b->call} DXChannel::get_all() ) { + next if $dxchan->is_user; my $call = $dxchan->call(); next if $dxchan == $main::me; my $t = cldatetime($dxchan->startt); @@ -27,7 +28,7 @@ foreach $dxchan ( sort {$a->call cmp $b->call} DXChannel::get_all_nodes ) { my $obscount = $dxchan->nopings; my $lastt = $nowt - ($dxchan->lastping); my $pingint = $dxchan->pingint; - my $ping = $dxchan->is_node && $dxchan != $main::me ? sprintf("%8.2f",$dxchan->pingave) : ""; + my $ping = $dxchan != $main::me ? sprintf("%8.2f",$dxchan->pingave) : ""; $sort = 'ANEA' if $dxchan->is_aranea; $sort = "DXSP" if $dxchan->is_spider; $sort = "CLX " if $dxchan->is_clx; -- 2.34.1