diff options
| -rw-r--r-- | lib/ExtUtils/t/Manifest.t | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/lib/ExtUtils/t/Manifest.t b/lib/ExtUtils/t/Manifest.t index bba68439ad..47e555b76b 100644 --- a/lib/ExtUtils/t/Manifest.t +++ b/lib/ExtUtils/t/Manifest.t @@ -150,8 +150,16 @@ is_deeply( [sort map { lc } @copies], [sort map { lc } keys %$files] ); foreach my $orig (@copies) { my $copy = "copy/$orig"; ok( -r $copy, "$copy: must be readable" ); - is( -w $copy, -w $orig, " writable if original was" ); - is( -x $copy, -x $orig, " executable if original was" ); + + SKIP: { + skip " original was not writable", 1 unless -w $orig; + ok(-w $copy, " writable if original was" ); + } + + SKIP: { + skip " original was not executable", 1 unless -x $orig; + ok(-x $copy, " executable if original was" ); + } } rmtree('copy'); |