From: minima <minima>
Date: Wed, 28 Jun 2006 08:33:55 +0000 (+0000)
Subject: ifix permissions
X-Git-Tag: 1.54~107
X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?p=spider.git;a=commitdiff_plain;h=8b5b39174f15921598327418562a96219d6abfd5

ifix permissions
---

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;