Bug 14670: add test for C4::Record::marc2cites
Signed-off-by: Hugo Agud <hagud@orex.es> Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com> Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
This commit is contained in:
parent
7fc709a7fe
commit
8fe7f04e51
|
|
@ -2,7 +2,7 @@
|
|||
|
||||
use Modern::Perl;
|
||||
|
||||
use Test::More tests => 14;
|
||||
use Test::More tests => 15;
|
||||
use MARC::Record;
|
||||
|
||||
use t::lib::Mocks;
|
||||
|
|
@ -157,6 +157,9 @@ is ($entity[0], "Björn", "Html umlauts");
|
|||
|
||||
|
||||
|
||||
$marc->field('260')->add_subfields(a => 'Hogwarts');
|
||||
my $cites = marc2cites($marc);
|
||||
is ($cites->{'Chicago'}, 'Rowling J.K, . 2011. Harry potter. Hogwarts: Reprints.', 'testing marc2cites');
|
||||
|
||||
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue