ifix permissions

[spider.git] / perl / importwwv.pl

diff --git a/perl/importwwv.pl b/perl/importwwv.pl
index 33b52f55f46a0957c433c45b0ded4ac6a5c2be1c..8de9a271151bb98d258da74da804ff68ab6a57b8 100755 (executable)
--- 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;