Graceful dying without TAP::Harness v3
This commit is contained in:
parent
c95ea52978
commit
f5851c96ff
1 changed files with 4 additions and 5 deletions
|
|
@ -21,15 +21,16 @@ my $session = WebGUI::Test->session;
|
|||
|
||||
#----------------------------------------------------------------------------
|
||||
# Tests
|
||||
plan tests => 88;
|
||||
plan tests => 90;
|
||||
|
||||
my ( $s, $t1 );
|
||||
|
||||
eval 'use TAP::Parser; use TAP::Parser::Aggregator';
|
||||
my $tp = use_ok('TAP::Parser');
|
||||
my $tpa = use_ok('TAP::Parser::Aggregator');
|
||||
|
||||
SKIP: {
|
||||
|
||||
skip "Unable to load TAP::Parser and TAP::Parser::Aggregator", 1 if $@;
|
||||
skip "Unable to load TAP::Parser and TAP::Parser::Aggregator", 88 unless $tp && $tpa;
|
||||
|
||||
#----------------------------------------------------------------------------
|
||||
# put your tests here
|
||||
|
|
@ -683,8 +684,6 @@ not ok 1 - S1Q0 answer number 1 property recordedAnswer not defined
|
|||
# got: ''
|
||||
END_TAP
|
||||
|
||||
use TAP::Parser;
|
||||
|
||||
sub try_it {
|
||||
my ( $test, $spec, $opts ) = @_;
|
||||
chomp($spec);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue