Bug 26518: Hide expected DBI warnings
Signed-off-by: Victor Grousset/tuxayo <victor@tuxayo.net> Signed-off-by: Nick Clemens <nick@bywatersolutions.com> Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
This commit is contained in:
parent
b0c39296c5
commit
1519050205
1 changed files with 7 additions and 2 deletions
|
@ -55,8 +55,13 @@ subtest 'AddBiblio' => sub {
|
|||
$record->append_fields($lccn_field);
|
||||
|
||||
my $nb_biblios = Koha::Biblios->count;
|
||||
my ( $biblionumber, $biblioitemnumber ) =
|
||||
C4::Biblio::AddBiblio( $record, '' );
|
||||
my ( $biblionumber, $biblioitemnumber );
|
||||
{
|
||||
local *STDERR;
|
||||
open STDERR, '>', '/dev/null';
|
||||
( $biblionumber, $biblioitemnumber ) = C4::Biblio::AddBiblio( $record, '' );
|
||||
close STDERR;
|
||||
}
|
||||
is( $biblionumber, undef,
|
||||
'AddBiblio returns undef for biblionumber if something went wrong' );
|
||||
is( $biblioitemnumber, undef,
|
||||
|
|
Loading…
Reference in a new issue