Suppress /bin/ls errors in t/op/stat.t
authorAndy Dougherty <doughera@lafayette.edu>
Thu, 24 Jan 2002 13:02:20 +0000 (08:02 -0500)
committerJarkko Hietaniemi <jhi@iki.fi>
Thu, 24 Jan 2002 18:03:02 +0000 (18:03 +0000)
Message-ID: <Pine.SOL.4.10.10201241238510.23176-100000@maxwell.phys.lafayette.edu>

p4raw-id: //depot/perl@14406

t/op/stat.t

index 1c0d4b2..82566a8 100755 (executable)
@@ -200,7 +200,7 @@ SKIP: {
       unless -d '/dev' && -r '/dev' && -x '/dev';
 
     my $LS  = $Config{d_readlink} ? "ls -lL" : "ls -l"; 
-    my $CMD = "$LS /dev";
+    my $CMD = "$LS /dev 2>/dev/null";
     my $DEV = qx($CMD);
 
     skip "$CMD failed", 3 if $DEV eq '';