diff --git a/t/db_dependent/Record.t b/t/db_dependent/Record.t index 2e0444911c..02bf8b1ada 100755 --- a/t/db_dependent/Record.t +++ b/t/db_dependent/Record.t @@ -84,15 +84,19 @@ my $test4xml=qq( is ($mods, $test4xml, "testing marc2mosxml"); +$marc->append_fields(MARC::Field->new( + '100', ' ', ' ', a => 'Rowling, J.K.' +)); my $field = MARC::Field->new('245','','','a' => "Harry potter"); $marc->append_fields($field); #my $endnote=marc2endnote($marc->as_usmarc); #print $endnote; -my $bibtex=marc2bibtex($marc); -my $test5xml=qq(\@book{, - title = "Harry potter" +my $bibtex=marc2bibtex($marc, 'testID'); +my $test5xml=qq(\@book{testID, + author = {Rowling, J.K.}, + title = {Harry potter} } );