X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/f250397e0162635a712417e2927c4bb7b6e2f215..1662bcf46eae814e0415d1f1a76383076f16d712:/dist/Cwd/t/cwd.t diff --git a/dist/Cwd/t/cwd.t b/dist/Cwd/t/cwd.t index f7b03ed..62426ff 100644 --- a/dist/Cwd/t/cwd.t +++ b/dist/Cwd/t/cwd.t @@ -183,7 +183,7 @@ rmtree($test_dirs[0], 0, 0); } SKIP: { - skip "no symlinks on this platform", 2+$EXTRA_ABSPATH_TESTS unless $Config{d_symlink}; + skip "no symlinks on this platform", 2+$EXTRA_ABSPATH_TESTS unless $Config{d_symlink} && $^O !~ m!^(qnx|nto)!; my $file = "linktest"; mkpath([$Test_Dir], 0, 0777);