small bugfix : adding bibdata only if exist
authortipaul <tipaul>
Wed, 15 May 2002 08:17:59 +0000 (08:17 +0000)
committertipaul <tipaul>
Wed, 15 May 2002 08:17:59 +0000 (08:17 +0000)
acqui/newbiblio.pl

index 4b714bc..104a1af 100755 (executable)
@@ -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;