@@ -, +, @@ - Apply this patchset - Run: $ kshell k$ prove t/Koha/Exceptions.t - Sign off --- Koha/Exceptions/Exception.pm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) --- a/Koha/Exceptions/Exception.pm +++ a/Koha/Exceptions/Exception.pm @@ -15,8 +15,10 @@ sub full_message { my $msg = $self->message; - if ( $self->isa('Koha::Exceptions::Object::FKConstraint') ) { - $msg = sprintf("Invalid parameter passed, %s=%s does not exist", $self->broken_fk, $self->value ); + unless ( $msg) { + if ( $self->isa('Koha::Exceptions::Object::FKConstraint') ) { + $msg = sprintf("Invalid parameter passed, %s=%s does not exist", $self->broken_fk, $self->value ); + } } return $msg; --