|
Lines 89-95
sub update_bib {
Link Here
|
| 89 |
my $query = shift; |
89 |
my $query = shift; |
| 90 |
my $biblionumber = shift; |
90 |
my $biblionumber = shift; |
| 91 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
91 |
my $biblio = Koha::Biblios->find( $biblionumber ); |
| 92 |
my $old_record = $biblio->metadata->record; |
92 |
my $old_record = $biblio->metadata; |
| 93 |
my $frameworkcode = $query->url_param('frameworkcode') // GetFrameworkCode($biblionumber); |
93 |
my $frameworkcode = $query->url_param('frameworkcode') // GetFrameworkCode($biblionumber); |
| 94 |
unless (defined $old_record) { |
94 |
unless (defined $old_record) { |
| 95 |
print $query->header(-type => 'text/xml', -status => '404 Not Found'); |
95 |
print $query->header(-type => 'text/xml', -status => '404 Not Found'); |
| 96 |
- |
|
|