projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
make sure that callsigns and locators are all upper case
[spider.git]
/
perl
/
QXProt.pm
diff --git
a/perl/QXProt.pm
b/perl/QXProt.pm
index bce0b56770f8daa5401401e8aa8f73a9f323fc23..f3a69128d4737fcb122638e3543478368370b5a8 100644
(file)
--- a/
perl/QXProt.pm
+++ b/
perl/QXProt.pm
@@
-84,6
+84,12
@@
sub process
}
}
+sub disconnect
+{
+ my $self = shift;
+ $self->DXProt::disconnect(@_);
+}
+
sub sendallnodes
{
my $nodes = join(',', map {sprintf("%s:%d", $_->{call}, int($_->{pingave} * $_->{metric}))} DXChannel::get_all_nodes());