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 => 14;
5
use Test::More tests => 15;
6
use MARC::Record;
6
use MARC::Record;
7
7
8
use t::lib::Mocks;
8
use t::lib::Mocks;
Lines 157-162 is ($entity[0], "Björn", "Html umlauts"); Link Here
157
157
158
158
159
159
160
$marc->field('260')->add_subfields(a => 'Hogwarts');
161
my $cites = marc2cites($marc);
162
is ($cites->{'Chicago'}, 'Rowling J.K, . 2011. Harry potter. Hogwarts: Reprints.', 'testing marc2cites');
160
163
161
164
162
165
163
- 

Return to bug 14670