This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Supress df warning in stat.t on OS X
authorMichael G Schwern <schwern@pobox.com>
Wed, 8 Nov 2006 08:51:50 +0000 (03:51 -0500)
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Wed, 8 Nov 2006 14:02:46 +0000 (14:02 +0000)
Message-ID: <4551E0F6.20108@gmail.com>

p4raw-id: //depot/perl@29234

t/op/stat.t

index c3df450..cde2974 100755 (executable)
@@ -30,7 +30,7 @@ $Is_Rhapsody= $^O eq 'rhapsody';
 
 $Is_Dosish  = $Is_Dos || $Is_OS2 || $Is_MSWin32 || $Is_NetWare || $Is_Cygwin;
 
-$Is_UFS     = $Is_Darwin && (() = `df -t ufs .`) == 2;
+$Is_UFS     = $Is_Darwin && (() = `df -t ufs . 2>/dev/null`) == 2;
 
 my($DEV, $INO, $MODE, $NLINK, $UID, $GID, $RDEV, $SIZE,
    $ATIME, $MTIME, $CTIME, $BLKSIZE, $BLOCKS) = (0..12);