Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 27981: (follow-up) Fix tests

Browse source 
Signed-off-by: Andrew Nugged <nugged@gmail.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
This commit is contained in:
Nick Clemens 2022-06-13 12:22:37 +00:00 committed by Tomas Cohen Arazi
parent c19326f351
commit ab358f06da
Signed by: tomascohen
GPG key ID: 0A272EA1B2F3C15F
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
t/db_dependent/Biblio.t
View file

@ -70,6 +70,7 @@ subtest 'AddBiblio' => sub {
t::lib::Mocks::mock_preference( 'BiblioAddsAuthorities', $marcflavour );
t::lib::Mocks::mock_preference( 'AutoCreateAuthorities', $marcflavour );
t::lib::Mocks::mock_preference( 'autoControlNumber', "OFF" );
my $mock_biblio = Test::MockModule->new("C4::Biblio");
$mock_biblio->mock( BiblioAutoLink => sub {
@ -835,12 +836,12 @@ subtest 'autoControlNumber tests' => sub {
is($record->field('001'), undef, '001 not set when pref is off');
t::lib::Mocks::mock_preference('autoControlNumber', 'biblionumber');
C4::Biblio::ModBiblio($record, $biblionumber, "", 1);
C4::Biblio::ModBiblio($record, $biblionumber, "", { skip_record_index => 1, disable_autolink => 1 });
$record = GetMarcBiblio({biblionumber => $biblionumber});
is($record->field('001')->as_string(), $biblionumber, '001 set to biblionumber when pref set and field is blank');
$record->field('001')->update('Not biblionumber');
C4::Biblio::ModBiblio($record, $biblionumber, "", 1);
C4::Biblio::ModBiblio($record, $biblionumber, "", { skip_record_index => 1, disable_autolink => 1 });
$record = GetMarcBiblio({biblionumber => $biblionumber});
is($record->field('001')->as_string(), 'Not biblionumber', '001 not set to biblionumber when pref set and field exists');