|
Lines 539-545
sub LinkBibHeadingsToAuthorities {
Link Here
|
| 539 |
'', '', "a" => "" . $field->subfield('a') ); |
539 |
'', '', "a" => "" . $field->subfield('a') ); |
| 540 |
map { |
540 |
map { |
| 541 |
$authfield->add_subfields( $_->[0] => $_->[1] ) |
541 |
$authfield->add_subfields( $_->[0] => $_->[1] ) |
| 542 |
if ( $_->[0] =~ /[A-z]/ && $_->[0] ne "a" ) |
542 |
if ( $_->[0] =~ /[A-z]/ && $_->[0] ne "a" |
|
|
543 |
&& C4::Heading::valid_bib_heading_subfield( |
| 544 |
$authority_type->auth_tag_to_report, $_->[0] ) |
| 545 |
); |
| 543 |
} $field->subfields(); |
546 |
} $field->subfields(); |
| 544 |
$marcrecordauth->insert_fields_ordered($authfield); |
547 |
$marcrecordauth->insert_fields_ordered($authfield); |
| 545 |
|
548 |
|
|
Lines 2989-2995
sub _koha_modify_biblio {
Link Here
|
| 2989 |
|
2992 |
|
| 2990 |
$sth->execute( |
2993 |
$sth->execute( |
| 2991 |
$frameworkcode, $biblio->{'author'}, $biblio->{'title'}, $biblio->{'unititle'}, $biblio->{'notes'}, |
2994 |
$frameworkcode, $biblio->{'author'}, $biblio->{'title'}, $biblio->{'unititle'}, $biblio->{'notes'}, |
| 2992 |
$biblio->{'serial'}, $biblio->{'seriestitle'}, $biblio->{'copyrightdate'}, $biblio->{'abstract'}, $biblio->{'biblionumber'} |
2995 |
$biblio->{'serial'}, $biblio->{'seriestitle'}, $biblio->{'copyrightdate'} ? int($biblio->{'copyrightdate'}) : undef, $biblio->{'abstract'}, $biblio->{'biblionumber'} |
| 2993 |
) if $biblio->{'biblionumber'}; |
2996 |
) if $biblio->{'biblionumber'}; |
| 2994 |
|
2997 |
|
| 2995 |
if ( $dbh->errstr || !$biblio->{'biblionumber'} ) { |
2998 |
if ( $dbh->errstr || !$biblio->{'biblionumber'} ) { |