DJGPP doesn't have \r\n delimited files (it has \r).

p4raw-id: //depot/perl@16622

diff --git a/lib/Tie/File/t/21_win32.t b/lib/Tie/File/t/21_win32.t
index d068544..80d795a 100644 (file)
--- a/lib/Tie/File/t/21_win32.t
+++ b/lib/Tie/File/t/21_win32.t
@@ -9,7 +9,7 @@
 
 my $file = "tf$$.txt";
 
-unless ($^O =~ /^(MSWin32|dos)$/) {
+unless ($^O =~ /^(MSWin32)$/) {
   print "1..0\n";
   exit;
 }