From: djk Date: Fri, 19 Nov 1999 12:27:36 +0000 (+0000) Subject: added rtt to who X-Git-Tag: R_1_35~16 X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=7fa741009758c923fab8d80c4a4c5722b4f6146f;p=spider.git added rtt to who --- diff --git a/cmd/who.pl b/cmd/who.pl index d001d9c3..beea0071 100644 --- a/cmd/who.pl +++ b/cmd/who.pl @@ -18,7 +18,9 @@ foreach $dxchan ( sort {$a->call cmp $b->call} DXChannel::get_all ) { my $t = cldatetime($dxchan->user->lastin); my $sort = $dxchan->is_ak1a() ? "NODE" : "USER"; my $name = $dxchan->user->name || " "; - push @out, sprintf "%10s $sort $t $name", $call; + my $ping = $dxchan->is_ak1a ? sprintf("(rtt %.2f secs)", $dxchan->pingave) : ""; + $ping = "" if $dxchan->call eq $main::mycall; + push @out, sprintf "%10s $sort $t $name $ping", $call; } return (1, @out)