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

(-)a/Koha/Biblio/Metadata.pm (-3 / +4 lines)
Lines 72-80 sub record { Link Here
72
        chomp $marcxml_error;
72
        chomp $marcxml_error;
73
        unless ($record) {
73
        unless ($record) {
74
            Koha::Exceptions::Metadata::Invalid->throw(
74
            Koha::Exceptions::Metadata::Invalid->throw(
75
                id     => $self->id,
75
                id             => $self->id,
76
                format => $self->format,
76
                biblionumber   => $self->biblionumber,
77
                schema => $self->schema,
77
                format         => $self->format,
78
                schema         => $self->schema,
78
                decoding_error => $marcxml_error,
79
                decoding_error => $marcxml_error,
79
            );
80
            );
80
        }
81
        }
(-)a/Koha/Exceptions/Metadata.pm (-4 / +3 lines)
Lines 25-31 use Exception::Class ( Link Here
25
    'Koha::Exceptions::Metadata::Invalid' => {
25
    'Koha::Exceptions::Metadata::Invalid' => {
26
        isa => 'Koha::Exceptions::Metadata',
26
        isa => 'Koha::Exceptions::Metadata',
27
        description => 'Invalid data',
27
        description => 'Invalid data',
28
        fields => ['id','format','schema', 'decoding_error']
28
        fields => ['id', 'biblionumber', 'format', 'schema', 'decoding_error']
29
    }
29
    }
30
);
30
);
31
31
Lines 36-43 sub full_message { Link Here
36
36
37
    unless ($msg) {
37
    unless ($msg) {
38
        if ( $self->isa('Koha::Exceptions::Metadata::Invalid') ) {
38
        if ( $self->isa('Koha::Exceptions::Metadata::Invalid') ) {
39
            $msg = sprintf( "Invalid data, cannot decode object (id=%s, format=%s, schema=%s, decoding_error='%s')",
39
            $msg = sprintf( "Invalid data, cannot decode object (id=%s, biblionumber=%s, format=%s, schema=%s, decoding_error='%s')",
40
                $self->id, $self->format, $self->schema, $self->decoding_error );
40
                $self->id, $self->biblionumber, $self->format, $self->schema, $self->decoding_error );
41
        }
41
        }
42
    }
42
    }
43
43
44
- 

Return to bug 26171