lib/File/Find.pm for QNX, NTO

Message-Id: <200204231550.LAA24648@bottesini.harvard.edu>

p4raw-id: //depot/perl@16108

diff --git a/lib/File/Find.pm b/lib/File/Find.pm
index ab7c189..72fd195 100644 (file)
--- a/lib/File/Find.pm
+++ b/lib/File/Find.pm
@@ -1188,7 +1188,8 @@ $File::Find::current_dir = File::Spec->curdir || '.';
 
 $File::Find::dont_use_nlink = 1
     if $^O eq 'os2' || $^O eq 'dos' || $^O eq 'amigaos' || $^O eq 'MSWin32' ||
-       $^O eq 'cygwin' || $^O eq 'epoc';
+       $^O eq 'cygwin' || $^O eq 'epoc' || $^O eq 'qnx' ||
+          $^O eq 'nto';
 
 # Set dont_use_nlink in your hint file if your system's stat doesn't
 # report the number of links in a directory as an indication