X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FSpot.pm;h=dca646884b730b499e07d357efb5096df568c894;hb=50bafbfa099ff0847beeb30e41bc62a361ef0536;hp=82bbc7ddb0dfa76408fffc07940724c439428457;hpb=ce0803e2110199eca1ad15cd6f66abde58cb949b;p=spider.git diff --git a/perl/Spot.pm b/perl/Spot.pm index 82bbc7dd..dca64688 100644 --- a/perl/Spot.pm +++ b/perl/Spot.pm @@ -57,8 +57,7 @@ sub add # compare dates to see whether need to open another save file (remember, redefining $fp # automagically closes the output file (if any)). - my @date = Julian::unixtoj($spot[2]); - $fp->write(@date, $buf); + $fp->writeunix($spot[2], $buf); return $buf; }