X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fwwv.pl;h=9f4350a6a42ba1c21fdba7303adc7ae7d8b60a35;hb=d7e744bdddf1217675118d1185a1e6070b8ff2b7;hp=dd7a6de5f343a472c780b3a88b91c6c572c26671;hpb=6a510dc82f3050640dfe6b8d499995348075fe7a;p=spider.git

diff --git a/cmd/wwv.pl b/cmd/wwv.pl
index dd7a6de5..9f4350a6 100644
--- a/cmd/wwv.pl
+++ b/cmd/wwv.pl
@@ -48,6 +48,7 @@ push @out, $self->msg('wwv1', 'k') unless $args{k} && $args{k} >= 0 && $args{k}
 push @out, $self->msg('wwv1', 'a') unless $args{a} && $args{a} >= 0 && $args{a} <= 400;
 push @out, $self->msg('wwv1', 'sf') unless $args{sf} && $args{sf} >= 65 && $args{sf} <= 300;
 push @out, $self->msg('wwv1', 'forecast') unless $forecast;
+push @out, $self->msg('wwv2') if Geomag::dup($d, $args{sf}, $args{k}, $args{a}, $forecast);
 
 return (1, @out) if @out;