View | Details | Raw Unified | Return to bug 11700
Collapse All | Expand All

(-)a/t/db_dependent/AuthoritiesMarc.t (-8 / +7 lines)
Lines 251-266 $zoom_record->mock('raw', sub { Link Here
251
251
252
my @biblios = C4::AuthoritiesMarc::merge($authid2, undef, $authid1, undef);
252
my @biblios = C4::AuthoritiesMarc::merge($authid2, undef, $authid1, undef);
253
253
254
is_deeply(\@biblios, [$biblionumber2]);
254
is_deeply(\@biblios, [$biblionumber2], 'merge() modified the expected biblio');
255
$biblio1 = GetMarcBiblio($biblionumber1);
255
$biblio1 = GetMarcBiblio($biblionumber1);
256
is($biblio1->subfield('609', '9'), $authid1);
256
is($biblio1->subfield('609', '9'), $authid1, 'field 609 of 1st biblio is unchanged');
257
is($biblio1->subfield('609', 'a'), 'George Orwell');
257
is($biblio1->subfield('609', 'a'), 'George Orwell', 'field 609 of 1st biblio is unchanged');
258
$biblio2 = GetMarcBiblio($biblionumber2);
258
$biblio2 = GetMarcBiblio($biblionumber2);
259
is($biblio2->subfield('609', '9'), $authid1);
259
is($biblio2->subfield('609', '9'), $authid1, 'field 609 of 2nd biblio has been modified');
260
is($biblio2->subfield('609', 'a'), 'George Orwell');
260
is($biblio2->subfield('609', 'a'), 'George Orwell', 'field 609 of 2nd biblio has been modified');
261
261
262
ok(defined(GetAuthority($authid1)));
262
ok(defined(GetAuthority($authid1)), '1st authority still exists');
263
ok(!defined(GetAuthority($authid2)));
263
ok(!defined(GetAuthority($authid2)), '2nd authority was deleted');
264
# End testing C4::AuthoritiesMarc::merge
264
# End testing C4::AuthoritiesMarc::merge
265
265
266
$dbh->rollback;
266
$dbh->rollback;
267
- 

Return to bug 11700