X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FTie%2FFile%2Ft%2F16_handle.t;h=f799496be1aa3c7d8bb1d9ac91fb11d8e378db55;hb=dbc1d98621f53e4a3938cf011ae90a189e72f69f;hp=72ff10b7be0c1a71a7135a69ddde3a82a6005db5;hpb=acd8d558460f297a79cf62ccca790c90790f8058;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/Tie/File/t/16_handle.t b/lib/Tie/File/t/16_handle.t
index 72ff10b..f799496 100644
--- a/lib/Tie/File/t/16_handle.t
+++ b/lib/Tie/File/t/16_handle.t
@@ -79,7 +79,7 @@ undef $o;
 untie @a;
 
 # (39) Does it correctly detect a non-seekable handle?
-{  if ($^O =~ /^(MSWin32|dos|BeOS)$/) {
+{  if ($^O =~ /^(MSWin32|dos|beos)$/) {
      print "ok $N # skipped ($^O has broken pipe semantics)\n";
      last;
    }