[PATCH perl@11487] fix fs.t for VMS

After this, the test passes.

--- t/io/fs.t;-0        Tue Jul 24 11:38:32 2001
+++ t/io/fs.t   Tue Jul 31 14:50:45 2001
@@ -256,6 +256,8 @@
 
 # check if rename() works on directories
 if ($Is_VMSish) {
+    # must have delete access to rename a directory
+    `set file tmp.dir/protection=o:d`;
     rename 'tmp.dir', 'tmp1.dir' or print "not ";
 }
 else {
[end of patch]

• [PATCH perl@11487] fix fs.t for VMS by Craig A. Berry