X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Fconnect.pl;h=4644d5c9d6bd497dbe79524e410cf7bdeb065126;hb=a90885c5c10b837b05ef1ebf718fd88e428a3c91;hp=025c20ea9a29f37c3bdf72a7d6436b059a532e65;hpb=de74820014fc2c49c789ebcbe683bccf23adbfe7;p=spider.git diff --git a/cmd/show/connect.pl b/cmd/show/connect.pl index 025c20ea..4644d5c9 100644 --- a/cmd/show/connect.pl +++ b/cmd/show/connect.pl @@ -23,6 +23,8 @@ foreach my $call (sort keys %Msg::conns) { $c = "Server"; } else { $addr = "AGW Port ($r->{agwport})" if exists $r->{agwport}; + $addr = "BPQ Stream ($r->{bpqstream})" if exists $r->{bpqstream}; + $addr ||= "$r->{peerhost}/$r->{peerport}"; $addr ||= "Unknown"; }