You are viewing a plain text version of this content. The canonical link for it is here.
Posted to test-cvs@httpd.apache.org by st...@apache.org on 2001/12/21 13:44:16 UTC
cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestUtil.pm TestConfig.pm
stas 01/12/21 04:44:16
Modified: perl-framework/Apache-Test/lib/Apache TestUtil.pm
TestConfig.pm
Log:
when creating perl scripts make them writable by user, so open() can
clobber them when the autogeneration is getting re-run, before the
autogenerated files were removed
Revision Changes Path
1.24 +1 -1 httpd-test/perl-framework/Apache-Test/lib/Apache/TestUtil.pm
Index: TestUtil.pm
===================================================================
RCS file: /home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestUtil.pm,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -r1.23 -r1.24
--- TestUtil.pm 2001/12/21 11:38:20 1.23
+++ TestUtil.pm 2001/12/21 12:44:16 1.24
@@ -102,7 +102,7 @@
my $shebang = "#!$Config{perlpath}\n";
my $warning = Apache::TestConfig->thaw->genwarning($file);
t_write_file($file, $shebang, $warning, @_);
- chmod 0555, $file;
+ chmod 0755, $file;
}
1.117 +1 -1 httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm
Index: TestConfig.pm
===================================================================
RCS file: /home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm,v
retrieving revision 1.116
retrieving revision 1.117
diff -u -r1.116 -r1.117
--- TestConfig.pm 2001/12/20 17:30:54 1.116
+++ TestConfig.pm 2001/12/21 12:44:16 1.117
@@ -678,7 +678,7 @@
print $fh $content if $content;
close $fh;
- chmod 0555, $file;
+ chmod 0755, $file;
}
sub cpfile {