Attachment #114050 for bug #26171

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

Lines 72-80 sub record { Link Here

(-)a/Koha/Biblio/Metadata.pm (-3 / +4 lines)
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	}




    'Koha::Exceptions::Metadata::Invalid' => {
        isa => 'Koha::Exceptions::Metadata',
        description => 'Invalid data',
        fields => ['id', 'biblionumber', 'format', 'schema', 'decoding_error']
    }
);



    unless ($msg) {
        if ( $self->isa('Koha::Exceptions::Metadata::Invalid') ) {
            $msg = sprintf( "Invalid data, cannot decode object (id=%s, biblionumber=%s, format=%s, schema=%s, decoding_error='%s')",
                $self->id, $self->biblionumber, $self->format, $self->schema, $self->decoding_error );
        }
    }

- 

Return to bug 26171

Lines 25-31 use Exception::Class ( Link Here

(-)a/Koha/Exceptions/Metadata.pm (-4 / +3 lines)
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	-