VMS-specific follow-up to tempfile name changes in 34182, plus

[p5sagit/p5-mst-13.2.git] / t / io / fs.t

diff --git a/t/io/fs.t b/t/io/fs.t
index 095239b..cd8bd55 100755 (executable)
--- a/t/io/fs.t
+++ b/t/io/fs.t
@@ -437,7 +437,7 @@ SKIP: {
 if ($^O eq 'VMS') {
     # must have delete access to rename a directory
     `set file $tmpdir.dir/protection=o:d`;
-    ok(rename('$tmpdir.dir', '$tmpdir1.dir'), "rename on directories") ||
+    ok(rename("$tmpdir.dir", "$tmpdir1.dir"), "rename on directories") ||
       print "# errno: $!\n";
 }
 else {