From f970d0b7f3cce42374748bf6d830be9dfd212b1d Mon Sep 17 00:00:00 2001
From: Hammat Wele <hammat.wele@inlibro.com>
Date: Fri, 6 Mar 2026 20:46:47 +0000
Subject: [PATCH] Bug 41690: (follow-up) Add test

Signed-off-by: David Nind <david@davidnind.com>

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Lucas Gass <lucas@bywatersolutions.com>
(cherry picked from commit a0b92c0bb6b48957c5b15c076ecbfba682518b0b)
Signed-off-by: Jacob O'Mara <Jacob.omara@openfifth.co.uk>
Signed-off-by: Wainui Witika-Park <wainuiwitikapark@catalyst.net.nz>
(cherry picked from commit 9b394ddb7a61b75545fb953aa6d5870e7ed3b84b)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
---
 t/db_dependent/Record.t | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/t/db_dependent/Record.t b/t/db_dependent/Record.t
index 9c9b237c8e..d1615b03eb 100755
--- a/t/db_dependent/Record.t
+++ b/t/db_dependent/Record.t
@@ -2,7 +2,7 @@
 
 use Modern::Perl;
 
-use Test::More tests => 15;
+use Test::More tests => 16;
 use MARC::Record;
 
 use t::lib::Mocks;
@@ -158,3 +158,11 @@ 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' );
+
+my $field245 = $marc->field('245');
+$field245->add_subfields( 'b' => 'the cursed child' );
+$cites = marc2cites($marc);
+is(
+    $cites->{'Chicago'}, 'Rowling J.K, . 2011. Harry potter: the cursed child. Hogwarts: Reprints.',
+    'testing marc2cites'
+);