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'} ) { |