From 6f9cb8912f6e08666f263827546bd8bf5a604a04 Mon Sep 17 00:00:00 2001
From: Henri-Damien LAURENT <henridamien.laurent@biblibre.com>
Date: Thu, 31 Dec 2009 14:41:14 +0100
Subject: [PATCH] (bug #4021) recent acquisitions Error500 on undefined biblio

This patch adds some more checks before creating the summary
---
 C4/Biblio.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/C4/Biblio.pm b/C4/Biblio.pm
index e5f55f2d7f..385f1413f7 100755
--- a/C4/Biblio.pm
+++ b/C4/Biblio.pm
@@ -1251,8 +1251,10 @@ Return the summary of a record.
 sub GetBiblioSummary {
     my $recorddata =shift @_;
     
+    return unless $recorddata;
     my $marcflavour = C4::Context->preference("marcflavour");
     my $marc=MARC::Record::new_from_xml($recorddata,"utf-8",$marcflavour);
+    return unless $marc;
     
     my $str;
     
-- 
2.39.5