X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fimportwwv.pl;h=8de9a271151bb98d258da74da804ff68ab6a57b8;hb=8b5b39174f15921598327418562a96219d6abfd5;hp=33b52f55f46a0957c433c45b0ded4ac6a5c2be1c;hpb=9d4c9fffafbce9bb7ab18299136c6e168a447c52;p=spider.git

diff --git a/perl/importwwv.pl b/perl/importwwv.pl
index 33b52f55..8de9a271 100755
--- a/perl/importwwv.pl
+++ b/perl/importwwv.pl
@@ -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;