diff options
| author | Tony Cook <tony@develop-help.com> | 2014-10-20 15:29:01 +1100 |
|---|---|---|
| committer | Tony Cook <tony@develop-help.com> | 2014-10-20 15:29:01 +1100 |
| commit | f095462e34b22920726c6bdd6b1140fdb9a5ae39 (patch) | |
| tree | 427a877b731311a3f43767946063a94677ed5bf0 /lib/File | |
| parent | c1976a97f7ea6ecccbf8daf996f3690e227243e4 (diff) | |
| download | perl-f095462e34b22920726c6bdd6b1140fdb9a5ae39.tar.gz | |
these permissions appear to be handled correctly in current cygwin
this TODO has been passing on my smoke testers for years, if it turns
out it isn't passing for someone, it should probably be skipped
instead of TODOed to prevent the noise.
Diffstat (limited to 'lib/File')
| -rw-r--r-- | lib/File/Copy.t | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/lib/File/Copy.t b/lib/File/Copy.t index 0e83a37e50..9e49c7d3f0 100644 --- a/lib/File/Copy.t +++ b/lib/File/Copy.t @@ -364,12 +364,8 @@ SKIP: { is (__$perm2, __$permdef, "Permission bits set correctly"); is (__$perm4, __$c_perm1, "Permission bits set correctly"); is (__$perm5, __$c_perm1, "Permission bits set correctly"); - TODO: { - local $TODO = 'Permission bits inconsistent under cygwin' - if $^O eq 'cygwin'; - is (__$perm3, __$c_perm3, "Permission bits not modified"); - is (__$perm6, __$c_perm3, "Permission bits not modified"); - } + is (__$perm3, __$c_perm3, "Permission bits not modified"); + is (__$perm6, __$c_perm3, "Permission bits not modified"); } } umask $old_mask or die $!; |