X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Fhftable.pl;h=40e54aa9eb05261f50978e66313159af60e24bf3;hb=66d98a2de271ef4a2702189e1d4284fe9fce5119;hp=71d186337da54448fa0ee181c5614b94beb2b69e;hpb=5bc87856bb191e42d91628a5a4d9579a242b9541;p=spider.git diff --git a/cmd/show/hftable.pl b/cmd/show/hftable.pl index 71d18633..40e54aa9 100644 --- a/cmd/show/hftable.pl +++ b/cmd/show/hftable.pl @@ -3,7 +3,7 @@ # # Copyright (c) 2001 Dirk Koopman G1TLH # -# $Id$ +# # # Modified on 2002/10/27 by K1XX for his own use # Valid inputs (and then tarted up by G1TLH to include in the @@ -87,13 +87,8 @@ return (1, @out) if @out; # default prefixes unless (@pref) { # no prefix or callsign, use default prefix - if ($self->dxcc >= 61 && $self->dxcc < 67) { - push @dxcc, [$_, 2] for (61..67); - push @pref, "GB"; - } else { - push @dxcc, [$self->dxcc, 2]; - push @pref, $self->call; - } + push @dxcc, [$_, 2] for @main::my_cc; + push @pref, $main::mycall; } # default date