Permalink
Browse files

Skip stat.t readability test on VMS.

This new test grants full access on a test file to group and other.
Since I'm a member of my own group and everyone is someone, I of
course have full access to the file, but the test expects it to be
unreadable.  If there is a hierarchy in Unix file permissions, it
clearly doesn't work the same way as the VMS one.
  • Loading branch information...
1 parent 3ade138 commit b555e4be492521d474da86140021aa9aa24ed51b @craigberry craigberry committed Feb 15, 2012
Showing with 1 addition and 0 deletions.
  1. +1 −0 t/op/stat.t
View
1 t/op/stat.t
@@ -525,6 +525,7 @@ SKIP: {
SKIP: {
skip "No lstat", 1 unless $Config{d_lstat};
skip "uid=0", 1 unless $<&&$>;
+ skip "Readable by group/other means readable by me", 1 if $^O eq 'VMS';
lstat($tmpfile);
-T _;
ok(eval { lstat _ },

0 comments on commit b555e4b

Please sign in to comment.