From b1dd6ad93b5c476547c0846defc89bf8090bf8ef Mon Sep 17 00:00:00 2001 From: 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