From 1662bcf46eae814e0415d1f1a76383076f16d712 Mon Sep 17 00:00:00 2001
From: Chris 'BinGOs' Williams <chris@bingosnet.co.uk>
Date: Fri, 2 Aug 2013 23:53:15 +0100
Subject: [PATCH] _perl_abs_path() symlink tests fail on QNX Neutrino

---
 dist/Cwd/t/cwd.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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);
-- 
2.7.4