View | Details | Raw Unified | Return to bug 14363
Collapse All | Expand All

(-)a/opac/oai.pl (-2 / +9 lines)
Lines 240-246 sub new { Link Here
240
    }
240
    }
241
241
242
    my $parser = XML::LibXML->new();
242
    my $parser = XML::LibXML->new();
243
    my $record_dom = $parser->parse_string( $marcxml );
243
    my $record_dom;
244
    eval {
245
        $record_dom = $parser->parse_string( $marcxml );
246
    };
247
    if ($@) {
248
        warn "OAI-PMH: No marcxml for record " . $args{identifier};
249
        return $self;
250
    }
251
244
    my $format =  $args{metadataPrefix};
252
    my $format =  $args{metadataPrefix};
245
    if ( $format ne 'marcxml' ) {
253
    if ( $format ne 'marcxml' ) {
246
        my %args = (
254
        my %args = (
247
- 

Return to bug 14363