randyk 2003/03/08 11:25:10
Modified: ModPerl-Registry/t basic.t
Log:
skip non-executable bit tests on Win32.
Revision Changes Path
1.12 +4 -0 modperl-2.0/ModPerl-Registry/t/basic.t
Index: basic.t
===================================================================
RCS file: /home/cvs/modperl-2.0/ModPerl-Registry/t/basic.t,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -r1.11 -r1.12
--- basic.t 8 Mar 2003 09:47:00 -0000 1.11
+++ basic.t 8 Mar 2003 19:25:10 -0000 1.12
@@ -28,6 +28,10 @@
# test non-executable bit
for my $alias (@aliases) {
+ if (Apache::TestConfig::WIN32) {
+ skip "non-executable bit test for Win32", 0;
+ next;
+ }
my $url = "/$alias/not_executable.pl";
ok t_cmp(