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

Reply via email to