Change 33916: File::Copy does not copy source file permissions to the target file

Change 33916 by craigb@craigb-brianor on 2008/05/23 15:50:14

	File::Copy does not copy source file permissions to the target file
	on VMS (it never has, but the new tests expected it to).

Affected files ...

... //depot/perl/lib/File/Copy.t#13 edit

Differences ...

==== //depot/perl/lib/File/Copy.t#13 (xtext) ====
Index: perl/lib/File/Copy.t
--- perl/lib/File/Copy.t#12~33804~	2008-05-10 08:37:03.000000000 -0700
+++ perl/lib/File/Copy.t	2008-05-23 08:50:14.000000000 -0700
@@ -226,7 +226,10 @@
 }
 
 
-{
+SKIP: {
+
+    skip "-- Copy preserves RMS defaults, not source file permissions.", 21 if $^O eq 'VMS';
+
     # Just a sub to get better failure messages.
     sub __ ($) {
         join "" => map {(qw [--- --x -w- -wx r-- r-x rw- rwx]) [$_]} 
End of Patch.

• Change 33916: File::Copy does not copy source file permissions to the target file by Craig A . Berry