X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLinux-SysInfo.git;a=blobdiff_plain;f=t%2F20-extended.t;h=28806a4884a806e62a3995f2d5a8378b6631b307;hp=c54751e2c4c8f4d104965c100185725a38298c7f;hb=aeb4782b4d78bdce2873eef541f5759dd9dcae42;hpb=6459a6c2b2ebbcd7a8be8fce533739ad96b1347b diff --git a/t/20-extended.t b/t/20-extended.t index c54751e..28806a4 100644 --- a/t/20-extended.t +++ b/t/20-extended.t @@ -1,12 +1,13 @@ #!perl -T -use Test::More tests => 4; +use Test::More; use Linux::SysInfo qw/sysinfo LS_HAS_EXTENDED/; -SKIP: -{ - skip 'Your kernel does not support extended sysinfo fields', 4 unless LS_HAS_EXTENDED; +unless (LS_HAS_EXTENDED) { + plan skip_all => 'your kernel does not support extended sysinfo fields'; +} else { + plan tests => 4; my $si = sysinfo; ok(defined $si);