From b1dd6ad93b5c476547c0846defc89bf8090bf8ef Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Wed, 15 May 2002 08:17:59 +0000
Subject: [PATCH] small bugfix : adding bibdata only if exist

---
 acqui/newbiblio.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/acqui/newbiblio.pl b/acqui/newbiblio.pl
index 4b714bc108..104a1af9b2 100755
--- a/acqui/newbiblio.pl
+++ b/acqui/newbiblio.pl
@@ -24,7 +24,9 @@ my $new;
 if ($ordnum eq ''){
   $new='yes';
   $ordnum=newordernum;
-  $data=bibdata($biblio);
+  if ($biblio) {
+  		$data=bibdata($biblio);
+	}
   if ($data->{'title'} eq ''){
     $data->{'title'}=$title;
     $data->{'author'}=$author;
-- 
2.39.5