Changeset 3188 for trunk/essentials/dev-lang/perl/t/io

Timestamp:

Apr 22, 2007, 10:57:48 AM (18 years ago)

Author:

bird

Message:

Applied patch from Paul (aka Creeping).

File:

• trunk/essentials/dev-lang/perl/t/io/fs.t (modified) (2 diffs)

trunk/essentials/dev-lang/perl/t/io/fs.t

@@ -23 +23 @@
 
 my $has_link            = $Config{d_link};
+
 my $accurate_timestamps =
     !($^O eq 'MSWin32' || $^O eq 'NetWare' ||
@@ -37 +38 @@
     }
 }
+
+if ($^O eq 'os2') {
+            $has_link            = 0;}
 
 my $needs_fh_reopen =