Lines 74-79
sub add_bib {
Link Here
|
74 |
foreach my $field ( $record->field($itemtag) ) { |
74 |
foreach my $field ( $record->field($itemtag) ) { |
75 |
$record->delete_field($field); |
75 |
$record->delete_field($field); |
76 |
} |
76 |
} |
|
|
77 |
|
78 |
if (C4::Context->preference('BiblioAddsAuthorities')) { |
79 |
BiblioAutoLink( $record, $frameworkcode ); |
80 |
} |
77 |
my ( $biblionumber, $biblioitemnumber ) = AddBiblio( $record, $frameworkcode ); |
81 |
my ( $biblionumber, $biblioitemnumber ) = AddBiblio( $record, $frameworkcode ); |
78 |
my $new_record = GetMarcBiblio({ biblionumber => $biblionumber }); |
82 |
my $new_record = GetMarcBiblio({ biblionumber => $biblionumber }); |
79 |
if ( $query->url_param('items') ) { |
83 |
if ( $query->url_param('items') ) { |
80 |
- |
|
|