@@ -, +, @@ --- t/db_dependent/AuthoritiesMarc.t | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) --- a/t/db_dependent/AuthoritiesMarc.t +++ a/t/db_dependent/AuthoritiesMarc.t @@ -251,16 +251,16 @@ $zoom_record->mock('raw', sub { my @biblios = C4::AuthoritiesMarc::merge($authid2, undef, $authid1, undef); -is_deeply(\@biblios, [$biblionumber2]); +is_deeply(\@biblios, [$biblionumber2], 'merge() modified the expected biblio'); $biblio1 = GetMarcBiblio($biblionumber1); -is($biblio1->subfield('609', '9'), $authid1); -is($biblio1->subfield('609', 'a'), 'George Orwell'); +is($biblio1->subfield('609', '9'), $authid1, 'field 609 of 1st biblio is unchanged'); +is($biblio1->subfield('609', 'a'), 'George Orwell', 'field 609 of 1st biblio is unchanged'); $biblio2 = GetMarcBiblio($biblionumber2); -is($biblio2->subfield('609', '9'), $authid1); -is($biblio2->subfield('609', 'a'), 'George Orwell'); +is($biblio2->subfield('609', '9'), $authid1, 'field 609 of 2nd biblio has been modified'); +is($biblio2->subfield('609', 'a'), 'George Orwell', 'field 609 of 2nd biblio has been modified'); -ok(defined(GetAuthority($authid1))); -ok(!defined(GetAuthority($authid2))); +ok(defined(GetAuthority($authid1)), '1st authority still exists'); +ok(!defined(GetAuthority($authid2)), '2nd authority was deleted'); # End testing C4::AuthoritiesMarc::merge $dbh->rollback; --