From b0e77eb844fbdd00e3dda258588d3ea795171909 Mon Sep 17 00:00:00 2001
From: Henri-Damien LAURENT <henridamien@koha-fr.org>
Date: Fri, 28 Sep 2007 16:45:17 +0200
Subject: [PATCH] Bug Fixing: verifying that biblionumber is not already stored
 in marcrecord before storing it

Signed-off-by: Chris Cormack <crc@liblime.com>
---
 C4/Biblio.pm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/C4/Biblio.pm b/C4/Biblio.pm
index ceb906f9b2..03d749f519 100644
--- a/C4/Biblio.pm
+++ b/C4/Biblio.pm
@@ -393,10 +393,10 @@ sub ModBiblio {
     # adding biblionumber
     my ($tag_biblionumber, $subfield_biblionumber) = GetMarcFromKohaField('biblio.biblionumber',$frameworkcode);
     $record->append_fields(
-	MARC::Field->new(
-		$tag_biblionumber,'','',$subfield_biblionumber => $biblionumber
-	)
-    );
+	    MARC::Field->new(
+		    $tag_biblionumber,'','',$subfield_biblionumber => $biblionumber
+	    )
+    ) unless ($record->subfield($tag_biblionumber,$subfield_biblionumber);
     
     # update the MARC record (that now contains biblio and items) with the new record data
     &ModBiblioMarc( $record, $biblionumber, $frameworkcode );
-- 
2.39.5