X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Fcall.pl;fp=cmd%2Fshow%2Fcall.pl;h=28c409f06273d8a6c53418e386bfe38771f4f523;hb=575a26ea68a641f895f68ed28391962d92bf1912;hp=4674b9180477c7c846d3be2e7405b6136ab8482c;hpb=96461da2f857d65129b2e6acd19bd075984c31f1;p=spider.git diff --git a/cmd/show/call.pl b/cmd/show/call.pl index 4674b918..28c409f0 100644 --- a/cmd/show/call.pl +++ b/cmd/show/call.pl @@ -16,7 +16,7 @@ use Net::Telnet; my $t = new Net::Telnet; -push @out, $self->msg('call1'); +push @out, $self->msg('call1', 'AA6HF'); foreach $l (@list) { $t->open(Host => "jeifer.pineknot.com", Port => 1235, @@ -29,7 +29,7 @@ foreach $l (@list) { } $t->close; } else { - push @out, $self->msg('e18', 'PineKnot'); + push @out, $self->msg('e18', 'AA6HF'); } }