In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/411c7dd7840a88fadfd96f0cb8264278810eb9fc?hp=23c4d79e42d547624749cd6dbf539e7969e2d373>
- Log ----------------------------------------------------------------- commit 411c7dd7840a88fadfd96f0cb8264278810eb9fc Author: Leon Brocard <a...@astray.com> Date: Mon Sep 28 14:24:57 2009 +0100 Check that sparse files hold at least a block (bug in eCryptfs: https://bugs.launchpad.net/ecryptfs/+bug/390833) ----------------------------------------------------------------------- Summary of changes: t/op/lfs.t | 3 ++- 1 files changed, 2 insertions(+), 1 deletions(-) diff --git a/t/op/lfs.t b/t/op/lfs.t index 2de965f..df9323f 100644 --- a/t/op/lfs.t +++ b/t/op/lfs.t @@ -117,7 +117,8 @@ print "# s2 = @s2\n"; zap(); unless ($s1[7] == 1_000_003 && $s2[7] == 2_000_003 && - $s1[11] == $s2[11] && $s1[12] == $s2[12]) { + $s1[11] == $s2[11] && $s1[12] == $s2[12] && + $s1[12] > 0) { print "1..0 # Skip: no sparse files?\n"; bye; } -- Perl5 Master Repository