Lines 30-41
my $builder = t::lib::TestBuilder->new();
Link Here
|
30 |
is( $builder->build(), undef, 'build without arguments returns undef' ); |
30 |
is( $builder->build(), undef, 'build without arguments returns undef' ); |
31 |
|
31 |
|
32 |
my @sources = $builder->schema->sources; |
32 |
my @sources = $builder->schema->sources; |
33 |
my $nb_failure = 0; |
33 |
my @source_in_failure; |
34 |
for my $source (@sources) { |
34 |
for my $source (@sources) { |
35 |
eval { $builder->build( { source => $source } ); }; |
35 |
eval { $builder->build( { source => $source } ); }; |
36 |
$nb_failure++ if ($@); |
36 |
push @source_in_failure, $source if $@; |
|
|
37 |
} |
38 |
is( @source_in_failure, 0, 'TestBuilder should be able to create an object for every sources' ); |
39 |
if ( @source_in_failure ) { |
40 |
diag ("The following sources have not been generated correctly: " . join ', ', @source_in_failure) |
37 |
} |
41 |
} |
38 |
is( $nb_failure, 0, 'TestBuilder can create a entry for every sources' ); |
|
|
39 |
|
42 |
|
40 |
my $my_overduerules_transport_type = { |
43 |
my $my_overduerules_transport_type = { |
41 |
message_transport_type => { |
44 |
message_transport_type => { |
42 |
- |
|
|