From e6c9df110feb0dc16ee0f6ae7c7853ba76e5f859 Mon Sep 17 00:00:00 2001
From: Martin Stenberg <martin@xinxidi.net>
Date: Thu, 22 Oct 2015 16:43:30 +0200
Subject: [PATCH] Bug 14670: add test for C4::Record::marc2cites

---
 t/db_dependent/Record.t | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/t/db_dependent/Record.t b/t/db_dependent/Record.t
index 53a4ae621f8..2688fd542a4 100755
--- a/t/db_dependent/Record.t
+++ b/t/db_dependent/Record.t
@@ -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&#xC3;&#xB6;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');
 
 
 
-- 
2.34.1