X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Fwwv.pl;h=fbb7fac32cb10705debe5979c2b513d71e276122;hb=0ce79a125db0acb043fceaa641d8b3a9eae71a41;hp=eb8d517bff9caed349809acefe210ef644144997;hpb=1728c7c7a64eaf2852c490629f022c7e70bc46e2;p=spider.git diff --git a/cmd/show/wwv.pl b/cmd/show/wwv.pl index eb8d517b..fbb7fac3 100644 --- a/cmd/show/wwv.pl +++ b/cmd/show/wwv.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; @@ -27,9 +27,9 @@ while ($f = shift @f) { # next field } $from = 1 unless $from; -$to = 10 unless $to; +$to = 5 unless $to; -push @out, "Date Hour SFI A K Forecast Logger"; +push @out, $self->msg('wwv3'); my @in = Geomag::search($from, $to, $main::systime); for (@in) { push @out, Geomag::print_item($_);