$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