X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FFile%2Fstat.t;h=0487b8b51a42b4e3fa973345ac41a03d7da79df8;hb=c798bd2165d7b5d59c62ab6330f7cf77ff8b09dd;hp=8215f45d8714ae521db3068c1510aa7fdf7eb3b9;hpb=f62ce20a4126b1e303e2d4d0a5c1e049ef2cb0c2;p=p5sagit%2Fp5-mst-13.2.git diff --git a/lib/File/stat.t b/lib/File/stat.t index 8215f45..0487b8b 100644 --- a/lib/File/stat.t +++ b/lib/File/stat.t @@ -30,7 +30,7 @@ is( $stat->dev, $stat[0], "device number in position 0" ); # On OS/2 (fake) ino is not constant, it is incremented each time SKIP: { - skip(1, 'inode number is not constant on OS/2') if $^O eq 'os2'; + skip('inode number is not constant on OS/2', 1) if $^O eq 'os2'; is( $stat->ino, $stat[1], "inode number in position 1" ); }