Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Changing 100$a coded field Only when marcflavour eq UNIMARC.

Browse source 
Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
This commit is contained in:
Henri-Damien LAURENT 2007-11-06 11:55:46 -06:00 committed by Joshua Ferraro
parent 7e1862a2e2
commit 06305a58ac
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
C4/AuthoritiesMarc.pm
View file

@ -517,7 +517,7 @@ sub AddAuthority {
$sth->finish;
}else{
$record->add_fields('001',$authid) unless ($record->field('001'));
if (($format eq "UNIMARCAUTH") && (!$record->subfield('100','a')){
if (($format eq "UNIMARCAUTH") && (!$record->subfield('100','a'))){
$record->leader(" nx j22 ");
my $date=POSIX::strftime("%Y%m%d",localtime);
if ($record->field('100')){