|
Lines 371-377
sub ModBiblio {
Link Here
|
| 371 |
|
371 |
|
| 372 |
if ( C4::Context->preference("CataloguingLog") ) { |
372 |
if ( C4::Context->preference("CataloguingLog") ) { |
| 373 |
my $biblio = Koha::Biblios->find($biblionumber); |
373 |
my $biblio = Koha::Biblios->find($biblionumber); |
| 374 |
logaction( "CATALOGUING", "MODIFY", $biblionumber, "biblio BEFORE=>" . $biblio->metadata->record->as_formatted ); |
374 |
my $record; |
|
|
375 |
my $decoding_error = ""; |
| 376 |
eval { $record = $biblio->metadata->record }; |
| 377 |
if( $@ ){ |
| 378 |
my $exception = $@; |
| 379 |
$exception->rethrow unless ( $exception->isa('Koha::Exceptions::Metadata::Invalid') ); |
| 380 |
$decoding_error = "There was an error with this bibliographic record: " . $exception; |
| 381 |
$record = $biblio->metadata->record_strip_nonxml; |
| 382 |
} |
| 383 |
logaction( "CATALOGUING", "MODIFY", $biblionumber, "biblio $decoding_error BEFORE=>" . $record->as_formatted ); |
| 375 |
} |
384 |
} |
| 376 |
|
385 |
|
| 377 |
if ( !$options->{disable_autolink} && C4::Context->preference('AutoLinkBiblios') ) { |
386 |
if ( !$options->{disable_autolink} && C4::Context->preference('AutoLinkBiblios') ) { |