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

(-)a/t/db_dependent/Record.t (-2 / +4 lines)
Lines 2-8 Link Here
2
2
3
use Modern::Perl;
3
use Modern::Perl;
4
4
5
use Test::More tests => 12;
5
use Test::More tests => 13;
6
use MARC::Record;
6
use MARC::Record;
7
7
8
use C4::Context;
8
use C4::Context;
Lines 141-146 is ($entity[0], "Björn", "Html umlauts"); Link Here
141
141
142
142
143
143
144
$marc->field('260')->add_subfields(a => 'Hogwarts');
145
my $cites = marc2cites($marc);
146
is ($cites->{'Chicago'}, 'Rowling J.K, . 2011. Harry potter. Hogwarts: Reprints.', 'testing marc2cites');
144
147
145
148
146
149
147
- 

Return to bug 14670