diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-09-17 13:47:49 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-09-17 13:47:49 +0000 |
| commit | 2ef4205bf93fa5838a18d15b355bcadc44c1c973 (patch) | |
| tree | a8b9d1cb81e384452e18034e9b57d8873c480a55 /t/op/lfs.t | |
| parent | 2f3a7380e68602194596be8ef9704a331ec0aa15 (diff) | |
| download | perl-2ef4205bf93fa5838a18d15b355bcadc44c1c973.tar.gz | |
Portable blocksize (replaces #4171).
p4raw-id: //depot/cfgperl@4172
Diffstat (limited to 't/op/lfs.t')
| -rw-r--r-- | t/op/lfs.t | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/t/op/lfs.t b/t/op/lfs.t index 46df014090..dcba6308ed 100644 --- a/t/op/lfs.t +++ b/t/op/lfs.t @@ -71,11 +71,7 @@ my @s; print "# @s\n"; -# Is there a portable way to find out what's the unit of st_blocks? - -my $BLOCKSIZE = 512; - -$BLOCKSIZE = 4096 if $^O eq 'unicos'; +my $BLOCKSIZE = $s[11] || 512; unless (@s == 13 && $s[7] == 1_000_003 && |