X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMooseX-Getopt.git;a=blobdiff_plain;f=t%2F011_version_options.t;fp=t%2F011_version_options.t;h=09bce03fa1ff970dca553729e30b2aab13c3c78e;hp=2385ebbb4392fb43c4264f0d87210fedf5f89166;hb=c68764d4810cd77cc6fb6e247924db5a54d66a93;hpb=da43301a259a4a028fe3e79baddb89bc09153462 diff --git a/t/011_version_options.t b/t/011_version_options.t index 2385ebb..09bce03 100644 --- a/t/011_version_options.t +++ b/t/011_version_options.t @@ -20,16 +20,20 @@ for my $opt (qw(-v --version -V)) { for my $test (qw(version_with_options.pl version_with_simpleconfig.pl)) { my $script = catfile('t', $test); - next if $test eq 'version_with_simpleconfig.pl' && !$HAVE_SIMPLECONFIG; + SKIP: { + if ($test eq 'version_with_simpleconfig.pl' && !$HAVE_SIMPLECONFIG) { + skip('MooseX::SimpleConfig unavailable', 3); + } - my ($v, undef) = capture { system $^X, $script, '-v' }; - like($v, qr/^SUCCESS/, "Option -v is correct"); + my ($v, undef) = capture { system $^X, $script, '-v' }; + like($v, qr/^SUCCESS/, "Option -v is correct"); - my ($version, undef) = capture { system $^X, $script, '--version' }; - like($version, qr/^SUCCESS/, "Option --version is correct"); + my ($version, undef) = capture { system $^X, $script, '--version' }; + like($version, qr/^SUCCESS/, "Option --version is correct"); - my (undef, $V) = capture { system $^X, $script, '-V' }; - like($V, qr/^Unknown option/, "Option -V is unknown"); + my (undef, $V) = capture { system $^X, $script, '-V' }; + like($V, qr/^Unknown option/, "Option -V is unknown"); + } } done_testing();