*** empty log message ***

This commit is contained in:
tipaul 2004-09-13 15:26:42 +00:00
parent 92decf23bf
commit c0585cdeaf

View file

@ -1585,10 +1585,11 @@ sub bibdata {
$sth = $dbh->prepare("Select * from additionalauthors where biblionumber = ?");
$sth->execute($bibnum);
while (my $dat = $sth->fetchrow_hashref){
$data->{'additionalauthors'} .= "$dat->{'author'}, ";
$data->{'additionalauthors'} .= "$dat->{'author'} - ";
} # while
chop $data->{'additionalauthors'};
chop $data->{'additionalauthors'};
chop $data->{'additionalauthors'};
$sth->finish;
return($data);
} # sub bibdata