cat2type in tests for VMS

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

diff --git a/t/io/fs.t b/t/io/fs.t
index 8a700b2..fd326b4 100755 (executable)
--- a/t/io/fs.t
+++ b/t/io/fs.t
@@ -172,7 +172,7 @@ else {
         print "ok 21 # skipped: no link\nok 22 # skipped: no link\n";
     }
     else {
-        print "ok 21 # skipped: $^O is neither 'MSWin32' nor 'NetWare'\nok 22 # skipped: $^O is neither 'MSWin32' nor 'NetWare'\n";
+        print "ok 21 # skipped: '$^O' is neither 'MSWin32' nor 'NetWare'\nok 22 # skipped: $^O is neither 'MSWin32' nor 'NetWare'\n";
     }
 }