X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FGeomag.pm;h=a247782199c7c3e12a05676596395c86d5aef6e1;hb=refs%2Ftags%2F1.54;hp=022c4519e6c7928f72f1ff616d632a16288b37d6;hpb=7bf828b924d7d1ddc7c81e65d816bdc36f55a92f;p=spider.git diff --git a/perl/Geomag.pm b/perl/Geomag.pm index 022c4519..a2477821 100644 --- a/perl/Geomag.pm +++ b/perl/Geomag.pm @@ -98,7 +98,7 @@ sub update (@allowed == 0 && @denied == 0)) { # my $trydate = cltounix($mydate, sprintf("%02d18Z", $mytime)); - if ($mydate >= $date) { + if ($mydate > $date) { if ($myr) { $r = 0 + $myr; } else {