@@ -, +, @@ already exists --- t/db_dependent/TestBuilder.t | 2 ++ 1 file changed, 2 insertions(+) --- a/t/db_dependent/TestBuilder.t +++ a/t/db_dependent/TestBuilder.t @@ -53,7 +53,9 @@ subtest 'Start with some trivial tests' => sub { # return undef if a record exists my $param = { source => 'Branch', value => { branchcode => 'MPL' } }; + local $SIG{__WARN__} = sub {}; $builder->build( $param ); # at least it should exist now + delete local $SIG{__WARN__}; warning_like { $builder->build( $param ) } qr/Violation of unique constraint/, 'Catch warn on adding existing record'; --