From b665d57026d829c2266ea254834225ca66544ebb Mon Sep 17 00:00:00 2001
From: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Date: Mon, 15 Jul 2024 11:24:13 +0100
Subject: [PATCH] Bug 29560: (follow-up) Clean up trailing comma

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
---
 Koha/Biblio.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Koha/Biblio.pm b/Koha/Biblio.pm
index 627ea95063..8029be8e43 100644
--- a/Koha/Biblio.pm
+++ b/Koha/Biblio.pm
@@ -1848,7 +1848,7 @@ sub generate_marc_host_field {
 
             # Control number
             if ( $host_field = $marc_host->field('001') ) {
-                $sfd{w} = $host_field->data(),;
+                $sfd{w} = $host_field->data();
             }
 
             # Control number identifier
@@ -1923,7 +1923,7 @@ sub generate_marc_host_field {
             }
         }
         if ( $host_field = $marc_host->field('001') ) {
-            $sfd{0} = $host_field->data(),;
+            $sfd{0} = $host_field->data();
         }
         $link_field = MARC::Field->new( 461, '0', ' ', %sfd );
     }