add CTY-3304

[spider.git] / perl / importwwv.pl

diff --git a/perl/importwwv.pl b/perl/importwwv.pl
index 33b52f55f46a0957c433c45b0ded4ac6a5c2be1c..f0fcfec0d651d093e7563e009144105bbbeee0e8 100755 (executable)
--- a/perl/importwwv.pl
+++ b/perl/importwwv.pl
@@ -11,7 +11,7 @@
 #
 # Copyright (c) 2004 Dirk Koopman G1TLH
 #
-# $Id$
+#
 #
 
 use strict;
@@ -101,6 +101,7 @@ sub out
        my $fn = "solar.txt.$$";
    
        open OUT, ">$tmp/$fn" or die "import $tmp/$fn $!";
+       chmod 0666, "$tmp/$fn";
        print OUT map { "$_\n" } @_;
        close OUT;