ifix permissions
authorminima <minima>
Wed, 28 Jun 2006 08:33:55 +0000 (08:33 +0000)
committerminima <minima>
Wed, 28 Jun 2006 08:33:55 +0000 (08:33 +0000)
perl/importwwv.pl

index 33b52f55f46a0957c433c45b0ded4ac6a5c2be1c..8de9a271151bb98d258da74da804ff68ab6a57b8 100755 (executable)
@@ -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;