|
Lines 831-846
if ( $op eq "cud-addbiblio" ) {
Link Here
|
| 831 |
|
831 |
|
| 832 |
} else { |
832 |
} else { |
| 833 |
|
833 |
|
| 834 |
#---------------------------------------------------------------------------- |
834 |
if ( $biblio && C4::Context->preference('marcflavour') eq 'MARC21' ) { |
| 835 |
# If we're in a duplication case, we have to set to "" the biblionumber |
|
|
| 836 |
# as we'll save the biblio as a new one. |
| 837 |
|
| 838 |
if ( C4::Context->preference('marcflavour') eq 'MARC21' ) { |
| 839 |
my $fixed_length_info = |
835 |
my $fixed_length_info = |
| 840 |
Koha::Biblio::Metadata::Extractor::MARC::MARC21->new( { biblio => $biblio } )->check_fixed_length; |
836 |
Koha::Biblio::Metadata::Extractor::MARC->new( { biblio => $biblio } )->check_fixed_length; |
| 841 |
$template->param( marc21_fixlen => $fixed_length_info ) if @{ $fixed_length_info->{failed} }; |
837 |
$template->param( marc21_fixlen => $fixed_length_info ) if @{ $fixed_length_info->{failed} }; |
| 842 |
} |
838 |
} |
| 843 |
|
839 |
|
|
|
840 |
# If we're in a duplication case, we have to set to "" the biblionumber |
| 841 |
# as we'll save the biblio as a new one. |
| 844 |
$template->param( |
842 |
$template->param( |
| 845 |
biblionumberdata => $biblionumber, |
843 |
biblionumberdata => $biblionumber, |
| 846 |
op => $op, |
844 |
op => $op, |
| 847 |
- |
|
|